mewingkitty,
Try:
Code:
Option Explicit
Sub Test()
Dim iFor As Integer
For iFor = 1 To 10
If Cells(1, 1) <> 1 Then
Cells(1, 2) = 2
End If
Next iFor
End Sub
Have a great day,
Stan
__________________
Have a great day,
Stan
stanleydgromjr
Windows Vista Business, Excel 2003 and 2007
|