delete rows

**np1966** · 09-27-2009, 12:53 AM

i have an excel sheet say with more than 1000 rows
i want to delete some rows based on certain condition say all rows which contain "AMERICA" in second column

can i do it with a macro

**shg** · 09-27-2009, 01:38 AM

Use AutoFilter to select rows containing America, select all rows, delete.

**np1966** · 09-27-2009, 02:05 AM

not this action only , i want to include this action in another macro,

**np1966** · 09-27-2009, 02:54 AM

Sub dele()
Range("b2").Select
Do Until Selection.Value = ""
If Selection.Value = "xxx" Then
Selection.EntireRow.Delete
Else
Selection.Offset(1, 0).Select
End If
Loop

Range("A1").Select

End Sub

i got the macro , but how to do the below

If Selection.Value not = "xxx" Then ( i have included not here)

i want to have the syntax for the above

**DonkeyOte** · 09-27-2009, 02:55 AM

np1966,

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here

Please edit your prior post per the above.