Filter in report

[Hans]

How to use a query object as filter in a report?
Example:
Filtername = ... "queryname"
DoCmd.OpenReport "reportname", acViewPreview, , "filtername"

How to use Reports("name").RecordSource=sqlString

Thanks, Hans

 

[Allen Browne]

While I'm not completely clear about what you want, you can do something
very much like your last line if you use the Open event procedure of the
report.

Example:

Private Sub Report_Open(Cancel As Integer)
Dim strSql As String
strSql = "SELECT * FROM Table1 WHERE (Inactive = False);"
Me.RecordSource = strSql
End Sub

 

[Hans]

Thanks for the quick reaction.

What I want is with "queryname" pointing to one of the (allready made)
queries in my database, like:

DoCmd.OpenReport "reportname", acViewPreview, , "queryname"

But this way doesn't work.

Thanks, Hans

 

[Allen Browne]

You can assign the saved query as the RecordSource of the report in
Report_Open, e.g.:
Me.RecordSource = "queryname"

OpenReport offers 2 ways to filter the report: a FilterName, and a
WhereCondition. The WhereCondition works reliably; the FilterName doesn't
IME.

 

[Hans]

Thanks, it works!
Hans