I've been using the record macro from within excel, so the code below is
what is generated and the Range("").select is the cell that is one row
above and one column to the right fo the cell that contains
"phbs_virtual"
It's the d27976 that changes each day.

Cells.Find(What:="phbs_virtual", After:=ActiveCell, LookIn:=xlFormulas,
_
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
_
MatchCase:=False, SearchFormat:=False).Activate
Range("D27976").Select
Range(Selection, Cells(1)).Select
Selection.EntireRow.Delete
Range("A1").Select


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!