Forの使い方

トップページ（目次）

212.Forの使い方

＜実行前後＞

→

Sub Forの基本的な使い方や考え方()

    For 行 = 1 To 3 '行が順番に1→2→3と変化する
    
        Range("A" & 行) = 行 & "行目" 'Range("A1") = 1行目
                                                  'Range("A2") = 2行目
                                                  'Range("A3") = 3行目 となる
    Next 行

End Sub

Forは処理数が決まっているので、変数は「行」や「列」や「セル」などで書いて、何が入っているのか明確にすると、個人的には読みやすいと思います。最終行を変数にした場合はこちら↓

Sub Forの基本的な使い方や考え方_最終行変数()

    最終行 = Cells(Rows.Count, "A").End(xlUp).Row
    
    For 行 = 1 To 最終行
    
        Range("A" & 行) = 行 & "行目"
        
    Next 行

End Sub