multiple printers

H

hogan

Is it possible to send a report to two seperate printers at the same time. I
would like to have our sales staff to be able to print a report on our office
printer and the report to print at our service managers printer as well.

Thank you.
 
A

Allen Browne

You will need to OpenReport twice: once for each printer.

If you are using Access 2002 or later, you can set the Printer object before
you open the report. The code would be something like this:
Dim strDoc As String
strDoc = "Report1"
DoCmd.OpenReport strDoc
Set Printer = Printers("Some printer name here")
DoCmd.OpenReport strDoc
Set Printer = Nothing

Use the name of your report in place of "Report1."

To get the correct printer name, open the Immediate Window (Ctrl+G) and
enter something like this:
? Printers(1).DeviceName
trying different numbers until you identify the one you want. Then
copy'n'paste that expression into the code above.

The last line resets the printer to the Windows default.
 
Top