본문으로 바로가기

08 엄마도 따라 할 수 있는 Excel VBA - 반복문 배우기(For문)


이번 시간에는 반복문을 배워볼게요. 

지난번에 배웠던 '글자 연결하기 "&"'과 '변수'를 사용할 것이기 때문에 아래 예제를 따라 하다가 이해가 잘 안간다면


이전글

2013/01/09 - [Excel VBA/VBA 배우기] - 05 엄마도 따라 할 수 있는 Excel VBA - 글자 연결하기 &

2013/01/09 - [Excel VBA/VBA 배우기] - 06 엄마도 따라 할 수 있는 Excel VBA - 변수 선언하기

을 참고하기 바랍니다.


시작

아래 소스코드를 입력하고 실행해봅시다.


Sub For문배우기()

For 반복범위 = 1 To 10
      Range("F" & 반복범위).Value = "반복" & 반복범위
Next

End Sub


결과


참 쉽죠?


F열에 나온 '반복1' - '반복10'이 보이나요?

10개는 시시하니까 6,000개 정도 해봅시다.

Sub For문배우기()
        For 반복범위 = 1 To 6000
        Range("F" & 반복범위).Value = "반복" & 반복범위
Next

End Sub


6000번이 순식간에 반복 되는 것이 보이시죠?


그러면 더 재미있는걸 한번 해볼게요.

이번에는 화면까지 움직이는걸로 해봅시다. 1000번 반복 해봅시다.

Sub For문배우기()

For 반복범위 = 1 To 1000
        Range("F" & 반복범위).Select
        Selection.Value = "반복" & 반복범위
Next

End Sub


'.Select'가 해당 셀을 선택하는 기능이에요.

'Selection'은 현재 선택된 셀을 나타내는 속성이구요.

'.Value'는 현재 선택된 셀의 값을 나타내는 속성입니다.


For문과 위의 3가지를 잘 조합하면 원하는 기능을 만드실 수 있겠죠?







댓글을 달아 주세요

  1. lee sung ho 2015.01.14 14:53 신고

    매우 감사합니다. 쉽고 간단하게 잘 설명해주셔서 막 시작 하고 있습니다. 복많이 받으세요

  2. 감사해오 2017.06.15 14:37 신고

    For 반복범위 = 1 to 6000 부분 할때
    활성화된 제한된 보기가 없다고 뜨는데 ㅜㅜ 왜그럴까요?

  3. 질문있어오 2017.06.15 14:48 신고

    끄아 계속 질문 남겨서 죄송해옹

    Sub For를Select하여이용()

    For 반복 = 1 To 65

    Range("D1:D8" & 반복).Select

    Selection.Value = "김이박최" & 반복

    Next

    End Sub

    결과가 D1:D865 까지 "김이박최65"로 나왔어여 ;ㅁ;

    제가 의도한건 D1:D8의 범위안에서 카운트?되게 하는거였는데

    D1: 김이박최1
    D2: 김이박최2
    ....
    D8: 김이박최8

    이런 느낌으로요.. ㅜㅜ뭐가 문제일까여

    • BlogIcon KyeongRok Kim 2017.06.16 02:02 신고

      아래와 같이 한번 해보세요.
      나머지를 이용해서 하면 좋은데 떠올리기가 처음에는 어려워요.

      Sub For를Select하여이용()
      For 반복 = 1 To 65
      Range("D" & 반복).Value = "김이박최" & (반복 Mod 8 + 1)
      Next
      End Sub

  4. 질문있어오 2017.06.16 13:38 신고

    안녕하세요~ 답변 감사합니다.
    주신 소스데로 했눈뎅


    김이박최2
    김이박최3
    김이박최4
    김이박최5
    김이박최6
    김이박최7
    김이박최8
    김이박최1


    요렇게 나오네요 ㅎㅎ MOD 좀더 공부해보고 원인 찾아봐야겠어여~~감사합니다 ^0^