VBA를 사용하여 Excel 시트의 마지막 행으로 이동하는 방법

Microsoft Excel의 가장 중요한 기능 중 하나는 유용한 기능을 자동화하는 기능입니다. 비즈니스 스프레드 시트에 수백 또는 수천 개의 행이 들어있는 경우 셀을 통해 조작하는 것이 어려울 수 있습니다. 자체 검색 기능을 구축하여이 문제를 제거하십시오. 몇 줄의 코드를 사용하여 스프레드 시트의 마지막 행을 찾아 자동으로 이동하는 VBA Sub를 만들 수 있습니다.

1.

Excel을 실행하고 여러 열이 포함 된 스프레드 시트를 엽니 다.

2.

"Alt-F11"을 눌러 "Visual Basic"편집기를 열고 "삽입 | 모듈. "VBA 프로젝트 창에 새 모듈을 추가합니다.

삼.

프로젝트 창의 오른쪽에 나타나는 편집 창에 다음 코드를 붙여 넣습니다.

Sub SelectLastRow () Dim finalRow As Integer

finalRow = ActiveSheet.UsedRange.Rows.Count

만약 finalRow = 0이면 finalRow = 1 End If

행 (finalRow) .Select End Sub

이 하위 행 컬렉션의 Count 속성을 검토하여 스프레드 시트의 마지막 행을 결정합니다. Sub는 그 값을 finalRow 변수에 저장합니다. Sub의 마지막 문장은 finalRow의 값을 VBA Select 메서드에 전달합니다.

4.

"F5"를 눌러 Sub를 실행하십시오. Select 메서드는 스프레드 시트의 마지막 행을 찾아 해당 행으로 이동하여 강조 표시합니다.

  • 행 (finalRow). 선택 명령은 스프레드 시트의 모든 행으로 점프하는 데 유용합니다. finalRow의 값을 1과 같은 다른 값으로 설정하면 Select 명령이 실행될 때 해당 행으로 이동합니다.

인기 게시물