Solved: Next without For error

[starsky]

Hi,

I'm getting a compile error - 'Next without For' for the following code. I don't understand why.

[vba]Sub test()

For Counter = 7 To 1000

Set curCell = Worksheets("Sheet1").Cells(Counter, 4)
If curCell.Value = "Yes" Then
curCell.Offset(0, 1).Value = "n/a"

Next Counter

End Sub[/vba]

Any ideas?

Thanks.

[mdmackillop]

End If

[p45cal]

or put[VBA]If curCell.Value = "Yes" Then
curCell.Offset(0, 1).Value = "n/a"
[/VBA]all on the same line:[VBA]If curCell.Value = "Yes" Then curCell.Offset(0, 1).Value = "n/a"
[/VBA]