deleting multiple rows

try this url in vbeditor and run

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

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

it will remove all rows containing blue as string or sustring
==================================

Gary Rowe <GaryRowe@discussions.microsoft.com> wrote in message
news:0D1D8DA9-9C86-4B7F-8093-5D9C69DDF858@microsoft.com...
> perhaps autofilter might do this for you. You can select a custom filter
> selection using a starts with or contains "blue" and delete the rows that
> meet the criteria.
>
> "Pablo" wrote:
>
> > Hello:
> >
> > I need to be able to delete multiple rows out of a worksheet. What I
need to
> > be able to do is have a function/macro that can identify a string of
> > characters and then delete all the rows that have those characters.
> >
> > For example, if row 4, 18, and 45 all had "blue" in them (assume column
is
> > A), then I need something to go delete row, 4, 18, and 45.
> >
> > At the top of my worksheet I will have several, probably about 3,
criteria,
> > such as, "blue", "red", and "green" that will all need to be deleted.
> >
> > Now here's where I really need help. A row may have "blue-orange" and if
> > "blue" is the key identifier, the row with "blue-orange" will need to be
> > deleted also.
> >
> > Thanks!
> >
> >
> >

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?

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" <native_texan_03@yahoo.com> wrote in message
news:1106840652.575173.300590@z14g2000cwz.googlegroups.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?
>