Selecting individual saved reports.

[nobeltlp]

Is it possible to select a saved report from
Containers.Reports.documents

Using the following I can list the entire contence
in a form list box, but there are only seven reports I want to list.

I have tried veriations of If and For each with Like
"*.XXX", but I always recieve;"expression not supported with type object."


Private Sub Form_Load()
Dim MyRep As Document, Mydb As Database
Set Mydb = CurrentDb

Me!Replist.RowSource = ""

For Each MyRep In Mydb.Containers("Reports").Documents
Me!Replist.RowSource = Me!Replist.RowSource & MyRep.Name & ";"
Next MyRep


Me!Pgto.Enabled = False
Me!Pgfrom.Enabled = False
End Sub

 

[Trevil]

How about posting the code you get the error with?

Yes, you can spin through all of the report names.

What are you trying to include or exclude?

"Have a great day today and a better day tomorrow!