a small question
Hello,
I have the following code to look for a keyword and then clear the
contents of the cells from columns A to E above the specified word..
Sub findkeyword()
Dim cell As Range
Dim myKeyword
myKeyword = "clue"
Set cell = Cells.Find(myKeyword)
If Not cell Is Nothing Then
Range("A4:E" & cell.Row - 1).ClearContents
End If
End Sub
I want to also delete cells F, G, and H located on 2 rows below the
keyword. Can someone help me with that coding?
Thanks,
jimmy.pop
|