Print more than one copy (1 Viewer)

MaleNurse325

Registered User.
Local time
Today, 10:43
Joined
Jan 11, 2016
Messages
67
Hi guys,
I have a report that I woudl like to print four copies of with this code. Where do I put the number of copies please?

Function mcrPrintConsignmentNote()
On Error GoTo mcrPrintConsignmentNote_Err

DoCmd.RefreshRecord
DoCmd.OpenReport "rptConsNote_by number", acViewNormal, "", "", acNormal
DoCmd.Close acReport, "rptConsNote_by number"
DoCmd.Close acForm, "frmConsignNote"
DoCmd.OpenForm "Switchboard", acNormal, "", "", , acNormal


mcrPrintConsignmentNote_Exit:
Exit Function
 

MaleNurse325

Registered User.
Local time
Today, 10:43
Joined
Jan 11, 2016
Messages
67
Thank you very much.
 

arnelgp

..forever waiting... waiting for jellybean!
Local time
Tomorrow, 01:43
Joined
May 7, 2009
Messages
19,169
if you are making a "report" that has distributions, eg:

copy 1 - patient copy
copy 2 - 201 file copy
copy 3 - accounting
copy 4 - extra copy

then there is a simple hack on this using a single report but
prints the 4 (distribution copy).
view the report in print preview.
 

Attachments

  • copies.accdb
    512 KB · Views: 246

Users who are viewing this thread

Top Bottom