General discussion

Locked

ACCESS97 - HOW TO PRINT MULTIPLE REPORT

By jgillespie ·
I have a database of shipping labels.. i need to print multiples of a labels, for example, 1 of 25, 2 of 25, etc... with both label number and total labels to print on each label.
I want to pass these values from the form I am using for input to the report, opening the report by a command button on the input form, then opening the report in preview mode so that my user can verify the data is correct before proceeding to print a million labels.
I would greatly appreciate any help on this.. Iam a real novice in Access. I can email a copy of the mdb file to anyone who would like to help if that would help you to understand my question.

This conversation is currently closed to new comments.

5 total posts (Page 1 of 1)  
| Thread display: Collapse - | Expand +

All Comments

Collapse -

ACCESS97 - HOW TO PRINT MULTIPLE REPORT

by Sunflower In reply to ACCESS97 - HOW TO PRINT M ...

Hello

when you create your print button, select the 'Macro Builder'
then when you enter the 'Printout' command at the bottom of the page you should see (second line up) 'Copies' put in the amount you want there.

Alternatively if you are usingVBA, use the following line of VBA
' DoCmd.PrintOut acPrintAll, , , acHigh, 12, True'

where it states '12' is the number of copies you will print out.

Hope this helps.

Collapse -

ACCESS97 - HOW TO PRINT MULTIPLE REPORT

by jgillespie In reply to ACCESS97 - HOW TO PRINT M ...

The question was auto-closed by TechRepublic

Collapse -

ACCESS97 - HOW TO PRINT MULTIPLE REPORT

by Sunflower In reply to ACCESS97 - HOW TO PRINT M ...

sorry missed the second part of your question there,
I would have 2 buttons, one to preview, and one to print.
Or you could insert the following VBA

Function Macro2()
On Error GoTo Macro2_Err
Dim Response As String
Dim MyString As String
DoCmd.OpenReport "ReportName", acNormal, "", ""
Response = MsgBox("are you ready to print?", vbYesNo)
If Response = vbYes Then ' User chose Yes.
MyString = "Yes"
DoCmd.PrintOut acPrintAll, , , acHigh, 12, True
Else ' User chose No.
MyString = "No"
End If
Exit Function

Macro2_Exit:
Exit Function

Macro2_Err:
MsgBox Error$
Resume Macro2_Exit

End Function

Collapse -

ACCESS97 - HOW TO PRINT MULTIPLE REPORT

by jgillespie In reply to ACCESS97 - HOW TO PRINT M ...

The question was auto-closed by TechRepublic

Collapse -

ACCESS97 - HOW TO PRINT MULTIPLE REPORT

by jgillespie In reply to ACCESS97 - HOW TO PRINT M ...

This question was auto closed due to inactivity

Back to Software Forum
5 total posts (Page 1 of 1)  

Software Forums