Excel VBAのDO-LOOPの基本から注意点までを解説

こんにちは！この記事では、Excel VBAの基本機能であるDO-LOOPの役割と使い方を初心者向けに解説します。

概要
構文の解説
1. コードの使用例
2. ネストでの注意点
まとめ

概要

DO-LOOPは、指定した条件に基づいて繰り返し処理を行うVBAの代表的な方法です。繰り返し回数が不定の場合に特に便利で、柔軟に活用できます。FOR-NEXTが固定回数の繰り返しに適しているのに対し、DO-LOOPは条件に基づいて繰り返しを制御できる点が特徴です。この記事では、DO-LOOPの基本構文や使い方、そして実際のコード例について解説します。

構文の解説

DO 　 [　{While/Until}　　条件式]
　　　[繰り返す処理]
　　　 [Exit Do]
Loop　[　{While/Until}　　条件式]

DO-LOOPの基本

DO と LOOP の間に繰り返し処理を記述します。
条件式は処理の繰り返しを決定するために使用します。
繰り返し処理を終了したい場合には、Exit Doを使います。

条件式の指定方法について

While: 条件式が満たされている間、処理を繰り返します。
Until: 条件式が満たされるまで、処理を繰り返します。

前判定と後判定の違い

前判定: DOの後ろに条件式を記述すると、処理を開始する前に条件の判定が行われます。
後判定: LOOPの後ろに条件式を記述すると、処理を1回行った後に条件を判定します。少なくとも1回は必ず処理が実行されるのが特徴です。

コードの使用例

Sub Sample13()
Dim 　Count As Long
Count = 1
Do
    Count = Count + 1
Loop While Count < 5
End Sub

Sub Sample13()

Dim 　Count As Long

Count = 1

Count = Count + 1

Loop While Count < 5

End Sub

このコードは、変数Countに1を足し続け、Countが5未満の間処理を繰り返します。後判定を使用しているため、少なくとも1回は処理が実行されてから条件の判定が行われます。

ネストでの注意点

DO-LOOPはネスト（入れ子構造）で使用することもできますが、条件が複雑になると無限ループやエラーが発生する可能性があります。以下の点に注意して、安全に使用しましょう。

条件式の設定
内部のDO-LOOPから確実に抜け出せるよう、条件式を適切に設定しましょう。条件が不明確だと、無限ループに陥るリスクがあります。
Exit Doの活用
必要に応じてExit Doを使用し、意図的にループを終了させることで、無限ループを防ぐことができます。
コードの可読性
複数のDO-LOOPをネストする場合、処理の流れが複雑になるため、コメントや適切な変数名を使ってコードをわかりやすく整理することが重要です。
エラーハンドリングの追加
ネストされたループでエラーが発生した場合に備え、エラーハンドリングを追加することを推奨します。たとえば、On Error GoToステートメントを用いることで、予期せぬエラーが発生しても、コードが適切に終了するようにできます。エラーハンドリングを使うことで、予期しない動作に対して適切に対処でき、システムの安定性が向上します。