Macro copying cells to a list in another spreadsheet

[Guest]

I need to set up a macro on a button that picks up a list of values and
transposes them onto another spreadsheet by pasting them at the bottom of a
list.

I can do the first one but am finding it a problem in locating the end of
the list via the macro.

I.E.

Name Jones
Number 1011
Location Central

2nd Spreadsheet

Name Number Location
Smith 1001 West
Betram 1004 East

I want to automatically put Jones at the bottom of this list.

Any help much appreciated

Mac

 

[Don Guillett]

use this idea
dlr=sheets("destinationsheet").cells(rows.count,"a").end(xlup).row+1