Sheets("wh").Activate
'추출
Range("B3") = Range("A1").Height
Range("C3") = Range("A1").ColumnWidth
'설정
'Range("D5").EntireColumn.ColumnWidth = Range("C2")
Range("D5").ColumnWidth = Range("C2")
'Range("D5").EntireRow.RowHeight = Range("B2")
Range("D5").RowHeight = Range("B2")'컴퓨터 > 엑셀' 카테고리의 다른 글
| 리본 customUI (0) | 2023.10.13 |
|---|---|
| 손상된 파일 복구 (0) | 2023.10.12 |
| vba replace 여러 개의 문자 바꾸기 (0) | 2023.09.13 |
| [엑셀VBA] 엑셀 로그인 시스템 만들기(비밀번호 포함) (0) | 2023.09.07 |
| vba 내선번호 배열 드래그앤드롭 (0) | 2023.09.05 |