관리 메뉴

Today is Present.

2023년 6월 23일 학습연구회 학습내용 본문

엑셀 VBA

2023년 6월 23일 학습연구회 학습내용

MorningPhys 2023. 6. 23. 13:48

엑셀 Addon 파일을 넣는 경로: C:\Users\user\AppData\Roaming\Microsoft\AddIns 에 넣으면 .. 

개발도구 메뉴 - Excel 추가기능 을 클릭하면 추가된 기능이 보인다. 체크! 

 

Range("a1").Select
Cells(1, 1).Select
Cells(1, 52).Select
Cells(1, "az").Select

Dim cn As Long
cn = 7
'A7셀을 선택
Range("A" & cn).select

1. 특정 열의 열번호 알아내기
Ctrl + G > ?Range("az1").column
2. 셀 직관적으로 작성하기
Cells(1, "a")

Sub 셀하나 선택하기_end속성()
Range("A1").End(xlDown).Select
Range("B1").End(xlDown).Select

'맨 마지막 셀(A1048576)을 선택 후 상위로 End(xlUp) 함
Cells(Rows.Count, "B").End(xlUp).Select

'맨 마지막 셀("XFD4")을 선택 후 상위로 End(xlUp) 함
Cells(4, Columns.Count).End(xlToLeft).Select

Sub 전체행_전체열()

Columns(2).Select
Columns("B").Select
Rows(4).Select

Range("A1").EntireColumn.Select
Range("C4").EntireColumn.Select
Range("B6").EntireRow.Select

1. 특정범위의 행의 수 카운트
Dim rng as Range
Set rng = Range("A1:D10")

rng.EntireRow.Select
rn = rng.Rows.Count
MsgBox rn

End Sub



이모지를 이용한 모임 소개

728x90
반응형

'엑셀 VBA' 카테고리의 다른 글

엑셀파일 버전체크  (0) 2023.04.17