create the button and assign a macro:
"Worksheets("sheetx").Printout copies:=1"
--
protonLeah
------------------------------------------------------------------------
protonLeah's Profile:
http://www.excelforum.com/member.php...o&userid=32097
View this thread:
http://www.excelforum.com/showthread...hreadid=531247