Do…Loop ステートメントの解説

概要

Do…Loop ステートメントは、指定された条件が真である間、または偽である間、一連のステートメントを繰り返し実行するためのVBAの制御構造です。

意義

Do…Loop ステートメントを使用することで、特定の条件が満たされるまで処理を継続的に行うことができます。これにより、条件に応じた繰り返し処理を効率的に実装することが可能となります。

構文

Do [{While | Until} 条件式]
   [ステートメント群]
Loop

- または -

Do
   [ステートメント群]
Loop [{While | Until} 条件式]

パーツ

• While: 条件式が真である間、ステートメント群を実行します。
• Until: 条件式が偽である間、ステートメント群を実行します。
• 条件式: 繰り返しを制御するための条件を指定します。

パラメータ

• While / Until: 必須。繰り返しの条件を指定するキーワードです。
• 条件式: 必須。ブール値の式または評価可能な式。

サンプルプロシージャ

Sub SampleDoLoop()
    Dim counter As Integer
    counter = 1
    
    ' counterが5未満の間、処理を繰り返す
    Do While counter < 5
        MsgBox "現在のカウンタの値は " & counter & " です。"
        counter = counter + 1
    Loop
End Sub

この例では、counterが5になるまでメッセージボックスでカウンタの値を表示し続けます。

関連するステートメントや関数

• For…Next: 指定された回数だけステートメント群を繰り返します。
• While…Wend: 条件が真である間、ステートメント群を繰り返します。

注意事項

• 無限ループにならないよう、Loop内で条件式がいずれ偽になるように注意が必要です。
• Do…Loopの中で変数の値が更新されない場合、ループは終了せずに無限に実行される可能性があります。