Kate,

You could use code similar to the following to accomplish this:

Sub changeNumofCopies()

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

End Sub

--
Regards,
Eddie
http://www.HelpExcel.com


"Kate" wrote:

For some reason an excel sheet someone else created has a default print
setting of 10 copies. Every time I need to remember to change it to 1 copy,
or I get a stack of them at the printer. It doesn't remain at 1 copy as a
default if I change it, print, and then save the document. Any ideas?