Paige,

You need and EndIf to match your If. Sometimes the messages get a little
mixed up as to which pair of With/End With, For/Next, End/EndIf is missing a
piece.

hth,

Doug

"Paige" wrote in message
...
Am trying to search through all of the Column E, and if any cell =
"SUPPORT"
AND the offset (0,4) to that cell < "", then it should put the word "Note
1"
in the cell's offset (0,5). I keep getting the error message 'Next
Without a
For', but I have a 'for' in the code (see below). Can someone please
advise
what I'm doing wrong?


With wks
Set rngToSearch = .Range(.Range("E12"), .Cells(Rows.Count,
"E").End(xlUp))
End With
For Each rng In rngToSearch
If rng.Value = "SUPPORT" And rng.Offset(0, 4) < "" Then
rng.Offset(0, 5).Value = "Note 1"
Next rng