Sub For文()
    Dim i As Integer
    For i = 1 To 10
        Cells(i, 1).Value = i
    Next i
End Sub

A1からA10までのセルんとこに、1から10までの数字を順番に入れるってやつだど。
まずな、Dim i As Integer っつって、数字を順番に扱うための器みてえなもんを用意してるんだっぺ。
それから、For i = 1 To 10 で、1から10までの繰り返しをやってるど。

それでな、Cells(i, 1).Value = i って書いてあっから、例えばiが1ならA1に「1」が入るし、
iが2んなったらA2に「2」って入るって仕組みだっぺな。
最後に、Next i で次の数字に進むようになってっぺ。
こうやって、A1からA10まできっちり1から10の数字が入るようにしちょるんだ。
みんな好ぎな定番のFor文だっぺよ！