Printing two copies with different footer on each (1 Viewer)

donsi

Registered User.
Local time
Today, 08:19
Joined
Sep 1, 2016
Messages
73
Hello,

Self teaching VBA and Access. So not a pro on either.

somehow I was able to manage have access print two copies of the report, but now I would like to have two footers on both copies, one should say "Original" and 2nd "Duplicate". How could it be done. Searched online but couldn't find the VBA guide. Here is the code I am using to print two copies.

Code:
DoCmd.OpenReport "RptBankFrm", acViewPreview, "", "[IssFormNo]=[Forms]![NavigationForm]![NavigationSubform]![IssFormNo]", acNormal
            DoCmd.PrintOut , , , , 2
            DoCmd.Close acReport, "RptBankFrm"
 

pbaldy

Wino Moderator
Staff member
Local time
Today, 08:19
Joined
Aug 30, 2003
Messages
36,118
I would use 2 OpenReport lines, without the preview argument. Use the OpenArgs argument to pass your 2 different texts. In the reports open event, use OpenArgs to set a textbox.
 

Users who are viewing this thread

Top Bottom