ループ処理の回数を指定する【For Next】【ExcelVBA】

For Nextステートメント
For Nextステートメントを使ったサンプルコード
注意点
関連記事

For Nextステートメント

ループ回数を指定してステートメントのグループを、ループ処理することができます。

構文

For counter = start To end [Step step]
　　[statements]
　　[Exit For]
　　[statements]
Next [counter]

counter	ループカウンターとして使用する変数を指定します。必須です。
start	counter の初期値を指定します。必須です。
end	counter の最終値を指定します。必須です。
step	ループを繰り返すたびに、counter の数が変更されます。省略時、step は既定値の 0 になります。省略可。
statements	指定した回数だけ実行されるステートメントです。 For と Next の間に記述します。省略可。

For Nextステートメントを使ったサンプルコード

Public Sub Sample()

    Dim i As Long     '変数を宣言
    For i = 1 To 5    '変数iを1から5まで繰り返す
        Cells(i, 1) = "番号" & i 'A列のi行目のセルに"番号+i"入れる
    Next i            'iの処理はここまで


'■空白行を挿入する場合
    Dim j As Long
    For j = 1 To 10 Step 2  '「Step 2」1行置きの指定
        Cells(j, 1) = 1
    Next j

'■ネストする場合
    Dim x As Long
    Dim y As Long      'ネストしたい変数を宣言
    For x = 1 To 5
        For y = 1 To 5 'yのループ回数を指定
            Cells(x, y) = "番号"
        Next y         'yの処理はここまで
    Next x

End Sub