条件分岐～For文の使い方～

よく利用される条件分岐のFor文について解説します。

For文の使い方

For文は指定した回数を繰り返したい場合に利用する条件分岐です。
書式は下記の通り。

Sub test()
Dim x As Long
　For x = 1 To 5　　//①
　　Cells(x, 1).Value = x　
　Next　　　　　　　//➁
End Sub

①
あらかじめ宣言しておいた変数xにForを利用して繰り返す回数１～５を指定する

➁
nextに処理が到達したら、Forに戻って処理を継続する

出力結果

よく使われるFor文の型

for文はCellsと合わせてループ処理を２重で回すことが多い。

先ほどの例ではA列のみの出力でしたが、２重でループすることでA列の出力が終わったらB列、C列と横に移動して処理を継続することができる。

Sub test()
Dim x As Long
Dim y As Long
  For y = 1 To 3
    For x = 1 To 5
      Cells(x, y).Value = y & "ー" & x
    Next
  Next
End Sub

上記のコードでは最初のループはA列を指定していて、A列の１行目から５行目に値を出力しています。

５行目の出力が終わったらB列に移動して最初のループ同様に１行目から５行目まで値を出力します。

C列まで値の出力が完了したら処理を停止します。

出力結果

補足１　セルの位置を指定