【Excel VBA】Do While構文とDo Until構文の使い方

はじめに

　「繰り返し」の動作をするときに　～の間は〇〇したい、～になるまで××したい　ということがあると思います。
　そのようなときは　Do While構文とDo Until構文を使うことができます

Do While 構文とは

★A列を上から順に見て行って　番号が５より小さい間はずっとB列に”OK”と入力する。

Sub sample_1()
    Dim i As Long
    i = 2
    
    Do While Cells(i, "A").Value < 5
        Cells(i, "B").Value = "OK"
        i = i + 1
    Loop
End Sub

☆出力結果

Do Until構文とは

★A列の点数を上から順に見て行って　70点より低くなるまでB列に”合格”と入力する

Sub sample2()
    Dim i As Long
    i = 2
    
    Do Until Cells(i, "A").Value < 70
        Cells(i, "B").Value = "合格"
        i = i + 1
    Loop
End Sub

☆出力結果

まとめ

Do WhileとDo Until、使い分けのポイント

• Do While: 条件が真である間に処理を繰り返したい場合に使用します。
• Do Until: 条件が偽である間に処理を繰り返したい場合に使用します。

例えば、カウンターが10未満の間ループを続ける場合はDo Whileを使い、カウンターが10になるまでループを続ける場合はDo Untilを使います。