티스토리 뷰

Range를 이용하여 가로로 Loop 돌리기


Range("A" & i)를 이용하면 세로로 loop를 돌릴 수 있었다. 허나 가로로 하고자 하면 A B C D 이렇게 알파벳으로 나오고, 알파벳을 유니 코드와 대응을 해서 돌리는 방법도 있지만 조금만 열이 많아져도 AA, AB, AC, AXA, AXB 이런식으로 나오기 때문에 애로사항이 있었다.


그걸 해결한 코드이다. 잘 응용해서 사용해 보시기 바란다.

Sub horizonLoop()
    For i = 1 To 20
        Range(Cells(1, i), Cells(1, i)).Value = i
    Next
End Sub


Range에 2개의 parameter(매개변수)를 주면 앞에 주소부터 뒤에 주소까지 선택이 되는 것을 응용한 것이다. 앞에 셀과 현재 셀을 같게 주면 범위 대신 한 셀만 선택이 된다. 그 셀에 행번호를 같은 i로 주면 for문을 이용해서 쉽게 가로로 Loop를 돌릴 수 있다.


세로로 루프를 돌리려면? 위의 코드에서 1과 i의 자리를 바꾸어 주면 된다.





728x90
공지사항
최근에 올라온 글
최근에 달린 댓글
Total
Today
Yesterday
링크
«   2024/11   »
1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
글 보관함