안녕하세요, 이번 포스팅은 엑셀 매크로 VBA 마지막 행 및 열 찾기 대해서 작성하도록 하겠습니다.
엑셀 매크로를 하다가 보면, 계속적으로 출력되는 행의 수를 찾거나 마지막 행의 위치를 찾아서 마무리 작업을 하고 싶을 때 유용하게 사용할 수 있는 엑셀 매크로 VBA 마지막 행 및 열 찾기 방법에 대해서 알아보도록 하겠습니다.
End() 구문 활용
엑셀 매크로 VBA 마지막 행 및 열 찾는 방법 중 가장 먼저 설명드릴 방법 중 하나는 바로 End() 구문을 활용하는 방법입니다.
End() 구문은 특정 열을 기준으로 마지막 행을 찾거나, 특정 행을 기준으로 마지막 열을 찾는 데 활용을 하실 수 있습니다.
End() 구문을 활용하는 기본 매크로 구문은 아래와 같습니다.
End() 구문을 활용하는 기본 매크로 구문
✔ Cells(Rows.Count, 1).End(xlUp).Row : 1 번열(A열)을 기준으로 마지막 행
✔ Cells(1, Columns.Count).End(xlToLeft).Column : 1번 행을 기준으로 마지막 열
예를 들어 아래 입력된 자료를 기준으로 보면, 출력값은 아래와 같습니다.
- Cells(Rows.Count, 1).End(xlUp).Row : 5번째 행
- Cells(1, Columns.Count).End(xlToLeft).Column : 5번째 열
위에 구문을 활용하여 기준 열이나 행을 변경하여 활용을 해보시면 됩니다.
UsedRange 활용
다음은 UsedRange 구문을 이용하는 방법을 알려 드리도록 하겠습니다.
UsedRange는 현재 사용하는 영역을 인식하는 구문으로 처음시작하는 행과 열에서부터 마지막 행과 열까지의 개수를 확인하는데 유용한 구문입니다.
UsedRange를 이용한 기본 구문을 아래와 같습니다.
| UsedRange를 이용한 기본 구문 | 구문 상세 설명 |
| ActiveSheet.UsedRange.Row | 시작 행 위치 |
| ActiveSheet.UsedRange.Column | 시작 열 위치 |
| ActiveSheet.UsedRange.Rows.Count | 시작하는 행에서부터 마지막 행까지의 개수 |
| ActiveSheet.UsedRange.Columns.Count | 시작하는 열에서부터 마지막 열까지의 개수 |
그럼 위에서 첨부한 예시를 기준으로 보면 처음 시작하는 행과 열은 모두 1번째 행과 열이고, 마지막 행까지는 총 5개이기 때문에 5번째 행을 출력을 하게 됩니다.
그리고 마지막 열 또한 5번째 열이기 때문에 5번째 열을 출력하게 됩니다.
하지만 시작하는 열이나 행이 1번째가 아닌 경우에는 아래 구문을 이용하여 마지막 행과 열의 위치를 확인하실 수 있습니다.
시작하는 행이나 열이 1번째가 아닌 경우에 마지막 행과 열 구하는 구문
✔ 마지막 행 : ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1
✔ 마지막 열 : ActiveSheet.UsedRange.Column + ActiveSheet.UsedRange.Columns.Count - 1
그리고 만약 가장 첫 번째 셀인 "A1" 셀에 값이 있다면 Rows.Count , Columns.Count 만으로 마지막 행과 열의 위치를 확인할 수 있습니다.
A1 셀에 값이 있는 경우 마지막 행과 열 구하는 구문
✔ 마지막 행 : ActiveSheet.UsedRange.Rows.Count
✔ 마지막 열 : ActiveSheet.UsedRange.Columns.Count
▶ 엑셀 매크로 VBA Comments 속성 이용 메모 추가 수정 방법
SpecialCells 활용
그리고 마지막으로 SpecialCells을 활용을 하면 마지막 행과 열 위치를 확인하실 수 있습니다.
SpecialCells를 이용하게 되면 공백에 상관없이 마지막 행과 열의 위치를 알 수 있기 때문에 공백이 있는 범위에서 작업을 하는 경우에는 가장 유용한 방법입니다.
SpecialCells을 활용하여 마지막 행과 열 위치 확인 구문
✔ 마지막 행 : ActiveSheet.Range("A1").SpecialCells(xlCellTypeLastCell).Row
✔ 마지막 열 : ActiveSheet.Range("A1").SpecialCells(xlCellTypeLastCell).Column
관련 글
함께 보면 도움이 되는 글
마치며
이상입니다. 지금까지 엑셀 매크로 VBA 마지막 행 및 열 찾기 대해서 포스팅을 작성을 하였습니다.
엑셀 매크로를 할 때 정말 유용하게 사용할 수 있는 구문이기 때문에 꼭 숙지하시고 알아가시는 걸 추천드립니다.
그럼 제 포스팅이 엑셀 매크로 공부나 작업하시는데 도움이 되셨으면 합니다. 감사합니다.
'엑셀 (Excel)' 카테고리의 다른 글
| 엑셀 Excel 서식 및 값만 붙여 넣는 방법 (0) | 2024.06.07 |
|---|---|
| 엑셀 매크로 VBA 시트 이동 복사 (맨 앞, 끝으로 시트 이동) (0) | 2024.06.01 |
| 엑셀 매크로 VBA SpecialCells 활용 조건에 맞게 셀 선택 방법 (0) | 2022.11.14 |
| 엑셀 매크로 VBA InputBox 이용하여 값 입력 하기 (0) | 2022.11.03 |
| 엑셀 매크로 VBA Clear, ClearContents, ClearFormats 이용 방법 (0) | 2022.10.26 |
댓글