What I mean by this is, when a "blue" is detected and the macro goes to
delete that row, I'd like it to also delete the next 5 rows as well.

Part B, can the first 10 rows be excluded from this search? (ie-start the
search at A11)



Public Sub test()
line2:
Range("a1").Activate
On Error GoTo line1

Cells.Find(what:="blue").Activate
ActiveCell.EntireRow.Delete
GoTo line2
line1:
End Sub




"Native" wrote in message
oups.com...
this is great! two more questions:

a) how can this be modified to delete not only the row with "blue", but
the next 5 rows as well?
b) can the search for "blue" begin only after say row 10?