Thread: Delete Rows Cut
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Shawn O'Donnell Shawn O'Donnell is offline
external usenet poster
  
Posts: 42
Default Delete Rows Cut
Cells(lngX, 1).EntireRow.Cut _
Destination:=Sheets(FUTURE.Name).Range("A65536").E nd(xlUp).Offset(1, 0)

Rows(lngX).Delete

Reply With QuoteReply With Quote