Button that will generate multiple outputs based on combo box inputs

[bstboy]

Sorry for the long winded Subject line.

So I currently have a form which has 5 different options to select in order to generate a report. Am I able to create a button which will generate all 5 reports with one click so i don't have to pick and choose each option and print separately?

Thanks

 

[boblarson]

Yes, you can do that. Do you just need them to print? Are you always going to want all 5? Or do you want the ability to only select some at some times and all at other times?

 

[bstboy]

I would want the ability to do it, but it doesn't need to be all of the time. Not sure weather I want to export it to .pdf or directly print the report, still haven't made that decision.

 

[boblarson]

So, here's one way. You could have a table which has all of the reports listed in a text field (with their name and then a friendly name). You would have a YES/NO field in that table too.

Then you can put a subform on the form that you have and put it in Continuous view so then the user can check off the reports they want and then click the button. The code to print would be:

Dim strSQL As String
Dim rst As DAO.Recordset
 
' selects only those marked as true
strSQL = "Select * From TableNameHere WHERE YesNoFieldNameHere <> 0"
 
Set rst = CurrentDb.OpenRecordset(strSQL, dbOpenForwardOnly)
 
Do Until rst.EOF
    ' opens the report as normal which prints it right away without viewing
    DoCmd.OpenReport rst!ReportNameFieldHere, acNormal
    rst.MoveNext
Loop
rst.Close
Set rst = Nothing

Remember to replace the names of things with your own names as I've just put in generic naming in there as a flag to you as to what to change.

 

[bstboy]

Still having trouble because the combo box I have which is selecting the report is in the form header and all of the data that will show on the report is a subform in the form detail. I guess I'm having trouble visualizing what to do. I've created the continuous form but I'm stuck there.