Print multiple reports

[HogansHero]

I have a database that serves as a incident reporting system. What I would like to do is be able to select from a list of all the reports I have the reports I would like to print. Thus eliminating the need to go to each report and print it.

Can anyone help?

Thanks in advance.

 

[Remou]

Create a table with a report name and, perhaps, a 'friendly' name. Use this as the basis of a multi-select listbox, then provide a print button to iterate through the selection printing each item.

 

[TheAceMan1]

How are ya HogansHero . . .

If you want to do this without the extra table advised by [blue]Remou[/blue] (albeit the friendly report name may be desireable), in the [blue]RowSource[/blue] of a Listbox or Combobox, copy/paste the following:

[blue]SELECT Name FROM MSysObjects WHERE ([Type]=-32764) ORDER BY Type;[/blue]

[blue]Your Thoughts? . . .[/blue]

See Ya! . . . . . .

Be sure to see thread181-473997 [blue]Worthy Reading![/blue]
Also faq181-2886 [blue]Worthy Reading![/blue]

 

[HogansHero]

Perhaps I should have explained that I am fairly new to this.

What your saying is create a "print reports" form based on a "Reports" table. With the field names being that of all of the reports that I have. What I would like to do is just be able to check a box beside each report name and hit a print button at the bottom. The printer would then print all the reports that you checked off.

Thanks in advance.

Scott

 

[Remou]

Have a look at this article

http://support.microsoft.com/kb/827423.

It is on how to create a list from a multi-select combobox, but you can see that instead of building a list, you can say:

    If Me!NamesList.ItemsSelected.Count <> 0 Then
        For Each oItem In Me!NamesList.ItemsSelected
            DoCmd.OpenReport Me!NamesList.ItemData(oItem), acViewPreview
        Next oItem
    Else
        MsgBox "Nothing was selected from the list", vbInformation
        Exit Sub  'Nothing was selected
    End If

If you use checkboxes, you will need to add a new checkbox everytime you want to add a report.

 

[HogansHero]

Perfect! I just have to tweak it to suit my needs.

Thanks.

 

[Remou]

Note that Access does not distinguish between reports and subreports in the MSysObjects table and that MSysObjects must never be tampered with.