Print Multiple Reports

KindleFire

Registered User.
Local time
Today, 03:28
Joined
Jun 11, 2001
Messages
18
I would like to have a button when pressed would print multiple reports, is this possible? For instance my main report have many subreports, so if I try to put to many subs on a report I get a "too many databases open error" I am thinking I can go around this by programming a button to print them all for me (i know I can make a single print button, but how about a multiple one)? Any help.
 
If u use the wizard to produce a button to print a report, all u need to do is to add additional pairs of lines for each report. i.e.

Private Sub Command43_Click()
On Error GoTo Err_Command43_Click

Dim stDocName As String

stDocName = "Report1"
DoCmd.OpenReport stDocName, acNormal
stDocName = "Report2"
DoCmd.OpenReport stDocName, acNormal
stDocName = "Report3"
DoCmd.OpenReport stDocName, acNormal
'etc
Exit_Command43_Click:
Exit Sub

Err_Command43_Click:
MsgBox Err.Description
Resume Exit_Command43_Click

End Sub
 

Users who are viewing this thread

Back
Top Bottom