Rows(80).Resize(Cells(Rows.Count,"A").End(xlUp).Ro w-79).Delete

--
__________________________________
HTH

Bob

"da" wrote in message
...
How do I select and delete row 80 to the last row which is 65,000?