I am assigning a printer & issuing a command to print a 1 page report using the code below.
There is a 10 second delay while I wait for the report to print. Is there a way to have the report print in batch or background mode so I can continue working while the printer/report is set up & prints? I know 10 seconds doesn't seem like a lot, but if I want to choose 10 invoices, it's almost 2 minutes that I have to just watch the screen .....
DoCmd.OpenReport "Invoice Report", acViewDesign
If IsNull(PrinterList) Then
Reports![Invoice Report].UseDefaultPrinter = True
Else
For Each prn In Application.Printers
If prn.DeviceName = PrinterList Then
Set Application.Printer = prn
Exit For
End If
Next prn
End If
DoCmd.Close acReport, "Invoice Report", acSaveNo
DoCmd.OpenReport "Invoice Report", acViewPreview
DoCmd.PrintOut , , , , NumOrig
DoCmd.Close acReport, "Invoice Report"
There is a 10 second delay while I wait for the report to print. Is there a way to have the report print in batch or background mode so I can continue working while the printer/report is set up & prints? I know 10 seconds doesn't seem like a lot, but if I want to choose 10 invoices, it's almost 2 minutes that I have to just watch the screen .....
DoCmd.OpenReport "Invoice Report", acViewDesign
If IsNull(PrinterList) Then
Reports![Invoice Report].UseDefaultPrinter = True
Else
For Each prn In Application.Printers
If prn.DeviceName = PrinterList Then
Set Application.Printer = prn
Exit For
End If
Next prn
End If
DoCmd.Close acReport, "Invoice Report", acSaveNo
DoCmd.OpenReport "Invoice Report", acViewPreview
DoCmd.PrintOut , , , , NumOrig
DoCmd.Close acReport, "Invoice Report"