Excel VBA Forループ内でExitを使いループを終了する

2024年3月23日 2024年11月16日

Excel VBAの Forループ内のExitは、ある条件に合致した場合にループを終了する方法。具体的な使い方や、注意点やサンプルコードを紹介します。

Excel VBA Forループ内のExitを利用

以下のようなシーンで利用されます。

・特定の条件が満たされた場合にループを即座に終了したい場合に使用します。例えば、リスト内の特定の要素を探す場合や、特定の条件が満たされるまでループを継続したい場合などに役立ちます。

ポイント

Exit Forステートメントを使用すると、ループがその時点で終了し、それ以降の反復が行われなくなります。

Excel VBA Forループ内のExitサンプルコード

Option Explicit

Sub ExitForExample()
    Dim i As Integer
    Dim targetValue As Integer
    Dim found As Boolean
    
    targetValue = 5
    found = False
    
    For i = 1 To 10
        If i = targetValue Then
            found = True
            Exit For ' 目標の値が見つかったらループを終了
        End If
    Next i
    
    If found Then
        MsgBox "目標の値が見つかりました。"
    Else
        MsgBox "目標の値が見つかりませんでした。"
    End If
End Sub

サンプルコードは、1から10までの数字を順番に処理し、targetValue と同じ値が見つかった場合に Exit For ステートメントを使用してループを終了します。その後、found 変数をチェックして目標の値が見つかったかどうかを確認し、適切なメッセージを表示します。

Excel VBAで自動化するコードのベースを習得したい方におすすめ！

VBAエキスパート資格は、日常業務でExcelを多用し、手動作業を減らしたいと考えている方には価値あるものです。

ExcelVBAエキスパートベーシック
仕事の効率をあげるためにExcelVBAを利用する人が対象の問題集です。

Excel VBAベーシック問題集

ExcelVBAエキスパートスタンダード
ExcelVBAの開発を仕事にする人が対象の問題集です。

ExcelVBAスタンダード問題集

Excel VBA エキスパート資格について知りたい方は、下記「Excel VBAスキルアップを目指すなら知っておきたいVBAエキスパート」をご確認ください。