Printing Multiple Copies

  • Thread starter Thread starter DuWayne
  • Start date Start date
D

DuWayne

Have code below to print current record in form
What code do i add to print 3 copies
Thanks

Option Explicit
Option Compare Database

Private Sub cmdTeeReducer_Click()

Me.Refresh
DoCmd.OpenReport "rptTeeReducer", , , "Orderid=" & Me.OrderID

End Sub
 
Here is one I got from Fred

DoCmd.OpenReport "rptTeeReducer", , , "Orderid=" & Me.OrderID
DoCmd.PrintOut , , , , 3

Jim
 
Back
Top