Okay, you want to be able to select multiple reports to print, not a report
in an option group (as Northwind does.)
Your code will need to OpenReport for each checkbox that is checked. This
example assumes a check box named "chkReport1", and - if checked -
"Report1" is to open, limited to the value in the ID (Number field) in the
form, when you click the command button named "cmdPreview":
Private Sub cmdPreview_Click()
Dim strWhere As String
Dim lngMode As Long
lngMode = acViewPreview
strWhere = "[ID] = " & Me.[ID]
If Me.chkReport1 = True Then
DoCmd.OpenReport "Report1", lngMode, , strWhere
End If
If Me.chkReport2 = True Then
DoCmd.OpenReport "Report2", lngMode, , strWhere
End If
'etc.
End Sub
If you wanted the reports to print instead of previewing, change line 2 to:
lngMode = acViewNormal

Signature
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.
> this did help some, though the Northwind database has alot to offer, there
> is nothing that helps me.
[quoted text clipped - 12 lines]
>
> P.S. the code you had one your web site did teach me a little about VB
Paul M - 30 Dec 2005 18:00 GMT
If there were one word to describe how helpful this information was, I don't
think it exists on this planet.
AWESOME, FANTASTIC, PERFECT AND ON TARGET!
Thank you Allen Browne for this more then just useful information, I don't
know what I would have done without it.
Warmest Regards,
Paul M
> Okay, you want to be able to select multiple reports to print, not a report
> in an option group (as Northwind does.)
[quoted text clipped - 41 lines]
> >
> > P.S. the code you had one your web site did teach me a little about VB