Hi there,,
I have a piece of code that is as follows:
On Error GoTo done
Do While 1 < 1000
Cells(1, 8).EntireColumn.Find("Page", LookIn:=xlWhole, lookat:=xlWhole, ).Select
Range(ActiveCell(), ActiveCell.Offset(7, 0)).Select
Selection.EntireRow.Delete
'a = 1 'this is just a bogus variable
Loop
done:
it works fine,, except it will not find "Page 1" for instance.. How do I make it find any cell that has page in it regardless of what else is in the cell.. Kind of like unchecking that box "find entire cells only".
Thanks a lot!