Hi,

I have a report that I need to view or print from two different forms. the report is based on a query and is generated according to a selection made on the form. Specifically:

in the form "ReportMenu", we select an event ("ParmResume" field) and click on the command button to view or print the report.
In the query, the IdEvent field has to be = to the [Forms]![ReportMenu]![parmResume]

Now... in the "HistoricTransfer" form, I need to do the same, but now the IdEvent field has to be = to the [Forms]![HistoricTransfer]![parmResume] field...

How can I change my query to make it work from either form without creating a new query/report for each form...

Thank you

Chantal

Use a button.

On the button On Click Event put this sort of code:

'====================Code Starts===
Dim stDocName As String
Dim stParameter As String
Dim stLinkCriteria As String

stDocName = "rptYourReportName"
stParameter = Forms![HistoricTransfer]![parmResume]

stLinkCriteria = "[QueryField] = " & "'" & stParameter & "'"

DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
'====================Code Ends===

Actually, you should have one generic query with no paramters, and one generic report based on that query. Then use buttons to pass paramters to the report - and thus to the query.

I have a database with more than 300 reports, all based on two queries and two reports, but different parameters are passed on each button. I also use Combo boxes to select criteria. When using Combo Boxes to pass criteria, make sure the proper column is bound for the parameter being passed.

I hope this helps.


mmcdonal

You can also do this:

stParameter1
stParameter2

stParameter1 = ...
stParameter2 = ...

stLinkCriteria = "[QueryFieldOne] = " & "'" & stParameter1 & "'" & " AND [QueryFieldTwo] = " & "'" & stParameter2 & "'"

You can do this for many criteria as long as your query doesn't get confused.

mmcdonal

Thank you very much... it works like a charm !!! :D