先生と生徒の会話形式で理解しよう

生徒

「Excel VBAでループ処理を書いたら、Excelが固まって動かなくなりました……」

先生

「それは無限ループが起きている可能性が高いですね。VBA初心者の方がとてもよく経験するトラブルです」

生徒

「無限ループって何ですか？パソコンが壊れたんでしょうか？」

先生

「壊れていませんよ。ループの仕組みと原因を知れば、しっかり防げるようになります」

1. Excel VBAのループ処理とは？

Excel VBAのループ処理とは、同じ作業を何度も繰り返す仕組みです。たとえば、1行ずつセルを確認したり、同じ計算を何回も行ったりするときに使います。

日常生活で例えると、「階段を一段ずつ上る」「10枚の書類に同じスタンプを押す」といった作業です。 Excel VBAでは、この繰り返しを For文 や Do While文 で書きます。

2. 無限ループとは何か？初心者が混乱しやすいポイント

無限ループとは、ループ処理が終わらず、ずっと繰り返されてしまう状態のことです。 Excel VBAは命令された通りに動くため、「終わる条件」がなければ永遠に処理を続けます。

その結果、Excelが重くなったり、操作を受け付けなくなったりします。これはパソコンの故障ではなく、VBAの命令ミスによるものです。

無限ループで最も多い原因は、「条件がずっと同じまま」になっていることです。ループは条件が変化しないと、終わることができません。


Dim i As Integer
i = 1

Do While i <= 5
    MsgBox i
End While

このコードでは、iの値が一度も変わらないため、条件がずっと成立したままになります。これが無限ループの典型例です。

ループ処理では、回数を数えるためのカウンタ変数を使うことが多いです。カウンタ変数とは、「今何回目か」を覚えておく数字のことです。


Dim i As Integer
i = 1

Do While i <= 5
    MsgBox i
    i = i + 1
End While

このように、ループの中で数値を増やすことで、条件が変わり、正しく終了します。増やす処理を書き忘れると、無限ループになります。

「いつ終わるか分からない条件」を使うことも、無限ループの原因になります。特にセルの値を条件にする場合は注意が必要です。


Do While Range("A1").Value <> ""
    MsgBox "処理中"
Loop

A1セルが空白にならない限り、このループは終わりません。データの状態を想定せずに書くと、思わぬ無限ループにつながります。

Forループは回数が決まっているため安全に見えますが、ステップの指定を誤ると意図しない動作になります。


Dim i As Integer

For i = 1 To 5 Step 0
    MsgBox i
Next i

Stepが0だと、数値が進まず、処理が止まらなくなります。数字の動きがどうなるかをイメージすることが重要です。

無限ループを防ぐためには、「必ず終わる仕組み」を作ることが大切です。回数制限を設けたり、途中で強制的に抜ける条件を用意すると安心です。


Dim i As Integer

For i = 1 To 100
    If i = 50 Then Exit For
Next i

Exit For は、ループを途中で抜ける命令です。これを使うことで、予期しない無限ループを防げます。

ループ処理を書くときは、「いつ終わるのか」を必ず考えることが大切です。条件、変数の変化、回数制限を確認するだけで、無限ループの多くは防げます。

Excel VBAの基本文法であるループ処理は、正しく使えば作業を大幅に効率化できます。無限ループの原因と防ぎ方を理解することで、安心してExcel自動化に取り組めるようになります。