For Next ステートメントとは
同一処理を指定した回数だけ繰り返すときに使います。
For Next の使い方
For Next で繰り返す方法を見ていきます。
For カウント変数 = 最初の値 To 最後の値 'ループ回数の指定 ’繰り返したい処理 Next カウント変数 'Nextステートメントでカウント変数は1追加され再びループに入ります。
For Next で繰り返す方法を見ていきます。
前回の Do While を思い出してみましょう。
Sub WhileTest() Dim i As Long i = 1 Do While i < 10 Cells(i, 1).Value = i i = i + 1 Loop End Sub
上と下とを比べてみましょう。
Sub ForTest() Dim i As Long For i= 1 to 9 Cells(i, 1).Value = i Next i 'iは省略可能です。 End Sub
前回のDo Whileと比べて
i = 1 が要らなくなります。
回数を指定します。
For i = 1 to 9とします。
i は Next ステートメントの後で自動的に1つ増やしてくれます。
Next i のiは省略可能です。
また、For Next 文では、step 2とすることで2飛びに出来ます。上のアニメを見てください。
step 3では3飛びになります。
For Next文とDo While文は両方とも覚えましょう。
コメント