Vba-exit-for-statement

VBA-終了

特定の条件に基づいて For ループを終了する場合は、 Exit For ステートメントが使用されます。 Exit For が実行されると、コントロールは For ループの直後の次のステートメントにジャンプします。

構文

VBAの Exit For ステートメントの構文は次のとおりです。

 Exit For

Copy

流れ図

VBA Exit Forステートメント

例

次の例では、 Exit For を使用しています。 カウンターの値が4に達すると、Forループは終了し、Forループの直後に次のステートメントに制御がジャンプします。

Private Sub Constant_demo_Click()
   Dim a As Integer
   a = 10

   For i = 0 To a Step 2 'i is the counter variable and it is incremented by 2
      MsgBox ("The value is i is : " & i)
      If i = 4 Then
         i = i * 10 'This is executed only if i=4
         MsgBox ("The value is i is : " & i)
         Exit For 'Exited when i=4
      End If
   Next
End Sub

Copy

上記のコードが実行されると、次の出力がメッセージボックスに出力されます。

The value is i is : 0

The value is i is : 2

The value is i is : 4

The value is i is : 40

Copy