[Excel 매크로 강좌] Excel 엑셀 매크로 For 문 만들기

안녕하세요, Davey 입니다. 오늘은 제가 가장 많이 사용하는 구문 중에 하나인, For 문을 만들어 보겠습니다. 일단 VBA 창을 활성화 시키기 위해, 개발도구 탭을 누르고, VBA를 실행 시킵니다.

 

 

활성화 시키면, 아래 Snap 처름 보이고, 여기에서 모듈을 하나 생성하면, 오른쪽의 코드창이 활성화 됩니다. 

 

 

 

아래 Snap shot과 같이, 코드를 일력하면, 간단한 For문이 형성이 됩니다. 

관련 내용의 주석은 아래 초록색 글자를 참조 하세요 ^^ 

 

 

 

결과 값은 아래 Snap 처럼, A2번 행렬부터, A11번 행렬까지, i가 값이 자동으로 입력이 되었습니다. 

 

 

 

그럼, 다른 Case로 For문을 만들어 보겠습니다. 이번에 작성할 For은, 각 Sheet에 있는 "A1"에 있는 내용은, 한 Sheet에 정리하는것을 만들어 보도록 하겠습니다. 

 

Case #1 - 각 Sheet에 있는 "A1"에 있는 내용은, 한 Sheet에 정리하는것

 

Sub For_Macro_Test1() 

Dim i As Integer 

For i = 2 To Sheet.Count 

   Sheets(1).Cells(i, "A") = Sheets(i).Cells(1, "A") 

Next i 


End Sub

 

- Sheet2 내용 

 

 

 

- Sheet3 내용

 

 

 

 

- Sheet1 For 문 결과 내용

 

 

 

위의 코드를 기반으로 하나 하나 스스로, 만들어 보면, 일할 때나, Report 작성할 때 유용할 거라고 생각합니다. 

그럼 조금이나마 도움이 됐으면 좋겠네요. 

 

제 Posting이 조금이나마 정보 전달에 도움이 되셨길 빌며, 되셨다면, 구독, 댓글, 공감 3종 세트 부탁 드립니다. 감사합니다. 

[저작권이나, 권리를 침해한 사항이 있으면 언제든지 Comment 부탁 드립니다. 검토 후 수정 및 삭제 조치 하도록 하겠습니다. 그리고, 기재되는 내용은 개인적으로 습득한 내용이므로, 혹 오류가 발생할 수 있을 가능성이 있으므로, 기재된 내용은 참조용으로만 봐주시길 바랍니다. 게시물에, 오류가 있을때도, Comment 달아 주시면, 검증 결과를 통해, 수정하도록 하겠습니다.]