Excel VBAで「For…Next文」を使って操作を指定した回数分繰り返す方法

2025.06.06

こんにちは！今回は、Excel VBAを使って「操作を指定した回数分繰り返す方法」について、初心者の方にもわかりやすく解説していきます。パソコンやスマホの操作が苦手な方でも安心して学べる内容ですので、ぜひ最後までご覧ください。

For…Next文とは？

Excelのイメージ

Excel VBAの「For…Next文」は、指定した回数だけ同じ処理を繰り返すための命令です。例えば、「セルに100を入力する」という操作を10回繰り返したい場合に使います。

以下のように記述します。

vba

For 変数 = 初期値 To 終了値

    実行する処理

Next 変数

例えば、セルに100を10回入力する場合は、以下のように書きます。

vba

Sub 繰り返し処理()

    Dim i As Integer

    For i = 1 To 10

        Cells(i, 1).Value = 100

    Next i

End Sub

このコードを実行すると、からまでのセルに100が入力されます。

「Step」を使うと、繰り返し処理の増減の幅を指定できます。

例えば、1から10までの数値を2ずつ増加させて表示したい場合、以下のように書きます。

vba

Sub 増加幅指定()

    Dim i As Integer

    For i = 1 To 10 Step 2

        Debug.Print i

    Next i

End Sub

このコードを実行すると、1, 3, 5, 7, 9と表示されます。

逆に、10から1までの数値を1ずつ減少させて表示したい場合、以下のように書きます。

vba

Sub 減少幅指定()

    Dim i As Integer

    For i = 10 To 1 Step -1

        Debug.Print i

    Next i

End Sub

このコードを実行すると、10, 9, 8, 7, 6, 5, 4, 3, 2, 1と表示されます。

では、実際の業務で役立つ例を見てみましょう。

vba

Sub 数値を2倍にする()

    Dim i As Integer

    For i = 1 To 10

        Cells(i, 2).Value = Cells(i, 1).Value * 2

    Next i

End Sub

このコードを実行すると、からまでのセルの数値を2倍にして、B1からB10までのセルに入力されます。

vba

Sub 行を削除する()

    Dim i As Integer

    For i = 10 To 1 Step -1

        Rows(i).Delete

    Next i

End Sub

このコードを実行すると、10行目から1行目までの行が順番に削除されます。逆順で削除することで、削除による行のずれを防ぎます。

「変数」は、繰り返し処理の回数をカウントするための箱のようなものです。例えば、「i」という名前を付けることが一般的です。

Stepを省略すると、デフォルトで1ずつ増加します。例えば、「For i = 1 To 10」と書くと、iは1から10まで1ずつ増加します。

はい、「Exit For」を使うことで、繰り返し処理を途中で抜けることができます。例えば、ある条件を満たした場合に処理を終了したいときに使います。

いま、あなたを悩ませているITの問題を解決します！
「エラーメッセージ、フリーズ、接続不良…もうイライラしない！」

あなたはこんな経験はありませんか？

✅ ExcelやWordの使い方がわからない💦
✅ 仕事の締め切り直前にパソコンがフリーズ💦
✅ 家族との大切な写真が突然見られなくなった💦
✅ オンライン会議に参加できずに焦った💦
✅ スマホの重くて重要な連絡ができなかった💦

平均的な人は、こうしたパソコンやスマホ関連の問題で年間73時間（約9日分の働く時間！）を無駄にしています。あなたの大切な時間が今この悩んでいる瞬間も失われています。

LINEでメッセージを送れば即時解決！

すでに多くの方が私の公式LINEからお悩みを解決しています。

最新のAIを使った自動応答機能を活用していますので、24時間いつでも即返信いたします。

誰でも無料で使えますので、安心して使えます。

問題は先のばしにするほど深刻化します。

小さなエラーがデータ消失や重大なシステム障害につながることも。解決できずに大切な機会を逃すリスクは、あなたが思う以上に高いのです。

あなたが今困っていて、すぐにでも解決したいのであれば下のボタンをクリックして、LINEからあなたのお困りごとを送って下さい。

ぜひ、あなたの悩みを私に解決させてください。

今回は、Excel VBAの「For…Next文」を使って、操作を指定した回数分繰り返す方法について解説しました。これで、同じ処理を何度も繰り返す作業を自動化できるようになりましたね。

他にも疑問やお悩みがありましたら、お気軽にLINEからお声掛けください。