How to del last two rows

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi Guys.
It dosn't matter how many row in the worksheet.
how to create a formula or macro to del only the last two rows.
 
Hi Guys.
It dosn't matter how many row in the worksheet.
how to create a formula or macro to del only the last two rows.
Click to expand...

All worksheets have the same number of rows. If you want to delete
rows 65536 and 65535 that is a simple macro.
Sub Deletelast2rows()

Range("A65535", "IV65536").Delete

End Sub
If you want the last two rows that have something in them then that is
a little trickier.

You will use End(xl(up)
Jay
 
the last 2 rows that I want to del is not the last two rows of the worksheet.
the last 2 rows I want to del is in my report, sometime the last two rows at
row 258 and 259. or 158,159, or 236,237.
 
Can you pick out a column that would be used to determine that last used row?

Dim LastRow as long
with worksheets("sheet9999")
lastrow = .cells(.rows.count,"A").end(xlup).row
if lastrow > 1 then
.rows(lastrow-1).resize(2).delete
end if
end with

I used column A to determine that last used row.
 
Back
Top