07-27-2008, 02:32 AM
|
#11 (permalink)
|
|
^^^ Bi-Winning ^^^
Join Date: Feb 2008
Posts: 4,669
|
Quote:
Originally Posted by abhorrent
This works.
Code:
Sub Find_YOUKEYWORD()
Dim rng As Range
Dim what As String
what = "YOUKEYWORD"
Do
Set rng = ActiveSheet.UsedRange.Find(what)
If rng Is Nothing Then
Exit Do
Else
Rows(rng.Row).Delete
End If
Loop
End Sub
|
nice move
__________________
"Concentrated power has always been the enemy of liberty" ~ Ronald Reagan
Quote:
Originally Posted by hellblazer
And subigo's stalkerish obsession with the Hannity forums and conservatives in general is fairly disturbing. You get the impression he's sitting in the dark somewhere furiously masterbating to the Hannity threads, his sallow complexion dimly lit by the glow of the computer monitor as he creepily cackles to himself.
|
|
|
|