본문으로 바로가기

vba sheet의 행 개수, 열 개수 구하기

category Excel VBA/VBA 예제 2016.04.17 15:42

vba sheet의 행 개수, 열 개수 구하기



결론부터 말하면 

행개수 = Range("a1", Range("a1").End(xlDown)).Rows.Count

열개수 = Range("a1", Range("a1").End(xlToRight)).Columns.Count


이렇게 구하면 된다.



아래와 같이 21행 7열의 sheet가 있다고 할 때 


이 sheet의 크기를 구하는 sub routine은 아래와 같다.

Sub count_volume()

    행개수 = Range("a1", Range("a1").End(xlDown)).Rows.Count

    열개수 = Range("a1", Range("a1").End(xlToRight)).Columns.Count

    

    MsgBox (행개수)

    MsgBox (열개수)

    

End Sub



이걸 응용해서 쓸 일이 많다. for문과 조합해서 쓸 일이 많다.



end.





댓글을 달아 주세요

  1. hlfan1234567@gmail.com 2018.02.16 22:59 신고

    코드가 이상합니다. 저 코드로 줄 수 안 세져요.