Vba에서 exit if 문을 사용하는 방법(예제 포함)

VBA에는 내장된 Exit If 문이 없지만 GoTo 문과 함께 If 문을 사용하면 쉽게 시뮬레이션할 수 있습니다.

다음 예에서는 실제로 이를 수행하는 방법을 보여줍니다.

예: VBA에서 Exit IF 문을 사용하는 방법

사용자에게 10보다 작은 정수를 입력하도록 요청한 후 IF 문을 사용하여 다음을 수행하도록 요청하는 매크로를 생성한다고 가정해 보겠습니다.

• 입력한 정수가 10보다 작으면 2를 곱하고 그 결과를 셀 A1 에 표시합니다.
• 입력한 정수가 10보다 작지 않으면 IF 문을 종료하고 오류 메시지를 생성합니다.

이를 위해 다음 구문을 사용할 수 있습니다.

 SubMultiplySomeValue ()

Dim inputInteger As Integer
     
'get integer from user
inputInteger = InputBox(" Please enter an integer less than 10 ")

'check if integer is less than 10
If inputInteger < 10 Then
Range(" A1 ").Value = inputInteger * 2
Else
GoTo FlagMessage
End If

FlagMessage:
MsgBox “ This number is not less than 10 ”
    
End Sub

이 매크로를 실행하면 10보다 작은 정수를 입력하라는 메시지가 표시됩니다.

값 5를 입력하고 OK를 누른다고 가정합니다.

이 정수는 10보다 작으므로 하위 프로시저에서는 입력한 값에 2를 곱하고 그 결과를 셀 A1 에 표시합니다.

그러나 대신 값 15를 입력한다고 가정해 보겠습니다.

Excel에서 다음과 같은 메시지 상자를 받게 됩니다.

입력한 값은 2를 곱하지 않으며 A1 셀에 결과가 표시되지 않습니다.

추가 리소스

다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.

VBA에서 오류가 발생하면 Sub를 종료하는 방법
VBA에서 IFERROR를 사용하는 방법
VBA를 사용하여 파일을 삭제하는 방법