Thread: Deleting Rows
View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Don Guillett[_2_] Don Guillett[_2_] is offline
external usenet poster
 
Posts: 1,522
Default Deleting Rows

For Lrow = LastRow To FirstRow Step -1
If .Cells(Lrow, "A").Value = "Employee Name" Then _
.Rows(Lrow-1).resize(2).Delete
Next Lrow


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"mooresk257" wrote in message
...
Hi Folks,

I want to delete two rows - one row has the words "Employee Name" in the
first column, and the row before it. This for-next loop removes the row
with
"Employee Name":

For Lrow = LastRow To FirstRow Step -1
If .Cells(Lrow, "A").Value = "Employee Name" Then _
.Rows(Lrow).Delete
Next Lrow

Any suggestions how to delete the row with "Employee Name" and the one
before it?

Thanks!

Scott