mwultong Blog ... 프로그래밍 / 계산기

컴퓨터 엑셀 워드 포토샵 구글어스 WINDOWS JAVASCRIPT JAVA C++

 
Monday, May 28, 2007

Excel VBA 엑셀 비베] 무한 루프, 루프 탈출, 빠져 나오기 방법; Do Loop Exit Do


비베에서는 "Do ... Loop"문으로 간단히 무한루프를 구현할 수 있습니다. 루프에서 빠져나오려면 "Exit Do"문을 사용합니다. C언어의 break문에 해당합니다.

빠져나올 수 없는 영원한 무한루프에서는 키보드의 Ctrl+Break키를 누르면 프로그램 전체의 실행이 강제로 종료됩니다. (Ctrl키를 누르면서 Pause/Break키를 누르는 것입니다.)

아래 예제는 무한 루프 속에서 대화상자를 계속 출력하는 예제입니다. 편의상 3개까지만 나타내고 종료합니다.

비베에서 무한루프(Infinity Loop) 만들기 예제


(엑셀에서 Alt+F11키를 눌러, 비베 에디터를 실행하고, 비베 에디터 메뉴의, "삽입 > 모듈"을 선택한 후, 다음 코드를 붙여 넣습니다.)
비베 에디터에서 F5 키를 누르거나, 엑셀에서 Alt+F8 키를 누르면 VBA 매크로가 실행됩니다.

Sub Infinity_Loop_Example()
  Dim Counter
  Counter = 0

  Do
    MsgBox "무한 루프: Ctrl+Break키로 강제 종료 가능"

    '''''''''''''''''''''''''''''''''''''''''
    ' 이 부분이 없으면 영원한 무한 루프
    '
    Counter = Counter + 1
    If Counter = 3 Then
      Exit Do
    End If
    '''''''''''''''''''''''''''''''''''''''''
  Loop

End Sub





tag: office
엑셀 Excel | 워드 Word | VBA 매크로 | 오피스

0 Comments:

<< Home RSS 2.0 feed

구글 Google 에서 제공하는 무료 블로그 서비스인 블로거 Blogger 의 인터넷 주소는 www.blogger.com 입니다. Blogger 에 블로그를 만들면, blogspot.com 이라는 주소에 블로그가 생성됩니다.
블로그를 직접 방문하지 않고도 최신 게시물을 구독하려면 RSS 2.0 feed 주소를 리더기에 등록하시면 됩니다.
Previous Posts
Monthly Archives
Top