Printing 2 Report by 2 separate printers

M

Mota

Hello;
I have 2 reports,named OrdersRpt and PricesRpt,and want to print them by two
separate printers connected to my system.I use this code to print them by
default printer:

Private Sub cmdPrint_Click
DoCmd.OpenReport "OrdersRpt"
DoEvents
DoCmd.OpenReport "PricesRpt"
MsgBox "Two reports been printed
Successfully",VbOkOnly+VbInformation,"Printing Reports"
End Sub

The prints are followingly,but since paper sizes are not equal i preffer to
send them to two separate printers and print them synchronizingly.How can i
do this?What to add to my code and where?any suggestion?
Thank you so much in advance.
 
L

Larry Daugherty

Rename the current reports to CurrentReportName_PrtA. Then copy each report
to CurrentReportName_PrtB. Open each of the *PrtB reports in turn and
select the second printer.

hth

-Larry-
 
M

Mota

Thank you for ur attention;
I want to do this automatically thru code.Do u know a solution?
Thank you.
 
M

Mota

Problem is how to select second printer THROUGH CODE.Can u help me?
Thank you for ur help
 
A

Adrian Jansen

If you look at the Application.printers object, you can find all the
printers available, and select them by name or number from code. See the
help for some examples.

--
Regards,

Adrian Jansen
J & K MicroSystems
Microcomputer solutions for industrial control
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top