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


--
Don Guillett
SalesAid Software

"Mac" wrote in message
...
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