You may want to try something like.

[vba]
For i = 1 to 10 'Row 1 to 10
'Do Something
'Range("A" & i) etc.
If Something = True then
i = i - 2 'Minus 2 because the next line will add 1.
End If
'Do Something Else
Next i[/vba]