概要：なぜFor～NextループがVBAの最重要課題なのか
Excel VBAを習得する過程において、最大の壁であり、かつ最大の武器となるのが「繰り返し処理（ループ）」です。その中でも最も基本的でありながら、応用範囲が無限大であるのが「For～Nextステートメント」です。
多くの初学者は、「セルを一つずつ操作する」という作業を、マクロを使わずに手動で行うか、あるいは非効率なコードを書いて時間を浪費します。しかし、For～Nextを正しく理解すれば、1万行のデータ処理であっても一瞬で終わらせることが可能です。本記事では、ただコードを写すのではなく、「なぜそのように書くのか」という論理的思考プロセスを重視した練習問題を提供します。ベテラン講師として、皆さんのコーディングスキルを一段階引き上げるための道筋を示します。
詳細解説：For～Nextの構造的理解
For～Nextループは、プログラミングにおける「カウンタ変数」の概念を理解することが全てです。
構文：
For カウンタ変数 = 初期値 To 終了値 [Step 増分]
‘ 実行したい処理
Next カウンタ変数
ここで重要なのは、カウンタ変数が「何を表しているのか」を明確に意識することです。多くの場合、カウンタ変数は「行番号」や「列番号」として利用されます。
1. 初期値：どこから処理を開始するか（例：データが始まる2行目）
2. 終了値：どこで処理を終えるか（例：最終行まで）
3. 増分（Step）：一度のループでいくつ進むか（省略時は1）
この基本構造を理解した上で、以下の練習問題に取り組んでください。
練習問題：売上データの自動集計
【問題】
A列に「商品名」、B列に「売上金額」が入力されています。データは2行目から10行目まで入っています。
このデータに対し、以下のマクロを作成してください。
1. C列に「判定」という文字を入力する。
2. 売上金額が5000円以上の場合は、D列に「目標達成」と表示する。
3. 5000円未満の場合は、D列に「要努力」と表示する。
サンプルコード：洗練された実装例
Sub CalculateSalesPerformance()
' 変数の宣言：カウンタ変数iと、最終行を保持する変数
Dim i As Long
Dim lastRow As Long
' 最終行を取得（動的に範囲を変えるためのテクニック）
lastRow = Cells(Rows.Count, 1).End(xlUp).Row
' 見出しの設定
Cells(1, 3).Value = "判定"
' For～Nextループの開始
' 2行目からデータの最終行までループを回す
For i = 2 To lastRow
' 条件分岐による処理
If Cells(i, 2).Value >= 5000 Then
Cells(i, 4).Value = "目標達成"
Else
Cells(i, 4).Value = "要努力"
End If
Next i
MsgBox "集計が完了しました。"
End Sub
詳細解説：コードのポイント
上記のコードには、実務で必ず使うべき「3つの鉄則」が盛り込まれています。
1. 最終行の動的取得：
`Cells(Rows.Count, 1).End(xlUp).Row` は必須のテクニックです。データ件数は日々変わるため、`To 10` のように数値を直接書き込むのはNGです。この書き方を覚えるだけで、コードの汎用性が劇的に向上します。
2. 変数の型宣言：
カウンタ変数 `i` に `Long` 型を使用しています。かつては `Integer` が使われていましたが、現在は行数が100万を超えることも珍しくないため、`Long` 型を使うのがプロの常識です。
3. インデントの徹底：
For～Nextの中にIf文が入る「ネスト（入れ子）」構造では、インデント（字下げ）を必ず行ってください。これを行わないと、どこでループが終わり、どこで条件分岐が終わっているのか、自分でも読み解けなくなります。
実務アドバイス：エラーを回避する思考法
VBAで最も多いエラーは「無限ループ」や「範囲指定ミス」です。これを防ぐために、プロは以下の思考プロセスを大切にしています。
・「Step」の活用：
もし「2行飛ばしで処理したい」という要件があれば、`Step 2` を追加します。また、データを下から上に処理したい場合は `For i = lastRow To 2 Step -1` と書きます。特に「行を削除する」処理の場合は、上から順に削除すると行番号がズレて誤作動するため、必ず下から上に処理（Step -1）するのが鉄則です。
・デバッグの技術：
コードが思い通りに動かないときは、`F8` キーを押して「ステップ実行」を行ってください。一行ずつコードが動く様子をウォッチウィンドウで確認することで、カウンタ変数 `i` がどのように変化しているかが一目瞭然になります。
・「イミディエイトウィンドウ」の活用：
ループの中で `Debug.Print i` と記述すると、VBAのイミディエイトウィンドウに現在処理中の行番号が出力されます。どの行でエラーが起きているのかを特定する際に、これほど便利なツールはありません。
まとめ：次なるステップへ
For～Nextループは、VBAにおける「自動化」の心臓部です。今回作成したコードは非常にシンプルですが、ここに応用を加えるだけで、「特定の条件の行を別シートに転記する」「複数のシートを一括で編集する」「大量のファイルを一度に開く」といった高度な自動化が可能になります。
練習のコツは、一度動いたら満足するのではなく、「もしデータが10万行あったらどうするか？」「もし条件が変わったらどう書き換えるか？」と自問自答することです。プログラミングは書いたコードの量だけ必ず上達します。
まずは、このコードを自分のExcelに貼り付け、ステップ実行を繰り返してみてください。カウンタ変数 `i` が1行ずつ数字を刻んでいく様子を見れば、VBAが自分の手足となって動いている実感が湧くはずです。次のステージでは、`For Each` 文や `Do While` ループといった、より柔軟な繰り返し処理を学ぶ準備を整えていきましょう。確実な基礎こそが、将来の複雑な自動化システムを作るための最強の土台となるのです。
