if then ~ end if

if xxx then ~ end if は、xxxの部分に書いた条件を満たす場合に、~ に書かれた命令を実行する文です。ryotaroは、for ~ nextとこのif文で、基本的な文型はほとんど、と言ってもいいくらい多用します。

次のプログラムは、for ~ next で書いたプログラムを少し修正したものです。for ~ nextの時は1から10までセルに値を入力しましたが、ここでは、iが5になる時だけ出力するプログラムになっています。

Sub test()   Dim a As Integer, i As Integer     For i = 1 To 10          ' 1から10まで繰り返す     If i = 5 Then       Cells(i, 2) = i       ' i行2列に、iを入力する     End If   Next i End Sub