print multiple copies of a report

[_Bigred]

Using Access 2000

I would like to set a button to print a report, but I would like to prompt
the user to designate how many copies they would like to print.

Is this possible?

TIA,
_Bigred

 

[Guest]

-In your form asking for the # of copies, name your textbox Copies
-Create a new macro
-Click on Macro Names in the View menu in the macro design view
-In the first row in the Macro Name column type Print_Report
-Still in the first row, but in the action column, select OpenReport
-Select your report from the Report Name combo box and Print from the view
list
-In the 3rd row of the macro type Print_Copies in the Macro Name column
-Save your macro and name it Print_Report_mcr
-Still in the 3rd row in your macro, select runmacro in the action column
-Select macro Print_Report_mcr.Print_Report in the combo box below
-In the Repeat count type =[Forms]![MyForm]![Copies]
-Save your macro
-In the onclick event of your form's button select
Print_Report_mcr.Print_Copies

-

 

[fredg]

Using Access 2000

I would like to set a button to print a report, but I would like to prompt
the user to designate how many copies they would like to print.

Is this possible?

TIA,
_Bigred

There are several ways.
Here is a plain vanilla one.
The report need not be opened, as it will print the report directly,
without preview.

Add a command button to the form.
Code it's click event:

Dim intCopies As Integer
intCopies = InputBox("How Many Copies?", , 1)
DoCmd.SelectObject acReport, "ReportName", True
DoCmd.PrintOut acPrintAll, , , , intCopies

Look up the SelectObject and the PrintOut methods in VBA help, as well
as InputBox().