Printing

[jeff]

I have some reports that I would like to print but will like to have more
than just one copy at a time. I would like to print 4 ea.
How can I code it so I can have the option of printing more than just one
file.

Jeff

--

 

[fredg]

I have some reports that I would like to print but will like to have more
than just one copy at a time. I would like to print 4 ea.
How can I code it so I can have the option of printing more than just one
file.

Jeff

Here is one method.
DoCmd.OpenReport "ReportName", acViewPreview
DoCmd.SelectObject acReport, "ReportName", False
DoCmd.PrintOut acPrintAll, , , , InputBox("How Many copies?", ,1)

It would be better however to have the number of copies wanted entered
into an unbound control on the form, in which case, use:

DoCmd.OpenReport "ReportName", acViewPreview
DoCmd.SelectObject acReport, "ReportName",True
DoCmd.PrintOut acPrintAll, , , , Me![ControlName]