View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Adrian Adrian is offline
external usenet poster
 
Posts: 57
Default Pasting after last record

Try this (or variations of it)
Range("a1").CurrentRegion.End(xlDown).Offset(1, 0).Select

Starting form somewhere in the existing data (above, "a1")
Current Region.end(xlDown) will take you to the last entry (the end being
determined by blank cells)
Offset(1,0) goes down one row further than that.
This illustration then Selects that cell, you can do other things, such as
Paste.

"Andy Wilkinson" wrote:

Hi all

I am cutting and pasting between worksheets using a macro and need to add
records to the end of a list, i.e. have already pasted 2000 rows, and want to
paste starting from row 2001, but am not able to specify the row number as it
varies every time.

Is there a vba command that will automatically paste after last row?

Thanks in advance

Andy