Private Sub CommandButton1_Click()
Worksheets("Print Data").PageSetup.PrintArea = "$A$1:$J$40"
End Sub

I did a search and tried to combine some results of what I found wit
bits and peices of what I have been learning. Can someone show me wha
I need to do here? Active wont work, because the page named "Prin
Data" that I want printed from my workbook is not active. And m
experiment of inserting "Worksheets("Print Data")" in its place didn'
work. So what should I use instead

--
Baf
-----------------------------------------------------------------------
Bafa's Profile: http://www.excelforum.com/member.php...fo&userid=3774
View this thread: http://www.excelforum.com/showthread.php?threadid=57362