Saving print defaults in Excel

Posted by Trish Mangan on December 19, 2001 11:28 AM

I want to save print defaults (File, Print - number of copies and entire workbook) so I do not have to set them each time. I have experimented with workspaces, templates, and Views - none of which seem to save these options. Any suggestions? If the suggestion is a macro, please detail it b/c I don't write Excel macros.

Posted by Juan Pablo G. on December 19, 2001 12:00 PM

I think you need a macro for this.

Something like

Sub MyPrint()
Dim Ans
Ans = Application.Dialogs(xlDialogPrint).Show(, , , 5, , , , , , , , , , True)
End Sub

This will show the Print Dialog with 5 copies, and will print to a file. Check the help file for more.

Juan Pablo G.

Posted by Juan Pablo G. on December 19, 2001 12:02 PM

Another option is this one (Without the dialog)

Sub MyPrint()
ActiveWorkbook.PrintOut Copies:=5, PrintToFile:=True
End Sub

Juan Pablo G.

Posted by Mark W. on December 19, 2001 2:06 PM

Configure a new workbook with your desired settings
and save it as Book.xlt into your XLStartup folder.

Posted by Trish Mangan on December 26, 2001 12:05 PM

Thanks. I was looking for a non-macro solution, but this one does work.

Posted by Trish Mangan on December 26, 2001 12:05 PM

Thanks. I was looking for a non-macro solution, but this one does work.