ActiveSheet.PageSetup.PrintArea = ActiveSheet.UsedRange.Address

--

Vasant


"Elsie" wrote in message
...
Hi, how do I select the last cell of all my data in a worksheet? something
equivalent to when you press ctrl+end..

I want to select the last cell to the home cell and set these as the print
area....


Elsie