Thread: find and delete
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Charlie Charlie is offline
external usenet poster
  
Posts: 703
Default find and delete
Try:

Dim LastRowOnSheet As Long

LastRowOnSheet = Sheets("Sheet1").UsedRange.Rows.Count +
Sheets("Sheet1").UsedRange.Row - 1
Sheets("Sheet1").Cells(LastRowOnSheet, 1).EntireRow.Delete

"enyaw" wrote:

How would i find the last row of information inputted from a form and delete
that row?
Reply With QuoteReply With Quote