print report help

[Scott_66701 via AccessMonster.com]

i set up a button to print multiple reports with one clip of the button. is
there a way to print the reports without the printer window popping up for
each report being printed?

 

[ruralguy via AccessMonster.com]

What version of Access are you using and on what OS? What code do you have
behind the button to print the reports?

 

[niuginikiwi]

Dim stDocName As String
stDocName = "rptName"
DoCmd.OpenReport stDocName, acPreview, "FilterName"
DoCmd.SelectObject acReport, stDocName
DoCmd.PrintOut acPrintAll, , , , 3
DoCmd.Close acReport, stDocName

If you have many printers installed on your PC, the above code inserted into
and onclick event of a button should print directly the default printer on
your PC instead of calling the Printer selection window.

Change the filter name (if you have any applied to report) and the report
name to suit what you have.

DoCmd.PrintOut acPrintAll, , , , 3 This line prints 3 copies but you can
change it to print any number you like.