set titlle of report based on button clicked on in the main form

[dovidg]

I have one report with several buttons to open the report based on filters on the buttons. when button "A" is pressed, I want title of report to be "A"
when button "B" is clicked, title should be "B"
thanks

[twinnyfo]

Reports![ReportName].Caption

will change the name of the report in its window, but I think you may be talking about a Title that prints on your Report?

If this is the case, the easiest way I can think of is to have the Title generated when you set the filters.

After the report is opened, use VBA to change either a Text Box or Label based on the Filters. E.g., button A is clicked,

DoCmd.OpenReport "ReportName", , , "WHERE Conditions"
Reports![ReportName].txtTitle = "This is Report A"

I think that should help. Let us know if you run across other snags.

[dovidg]

thank you for your responce
this is my code

DoCmd.OpenReport "RptUnion", acViewPreview, , "Check=-1"
Reports![RptUnion].Title5 = "This is Report A"

title5 is an unbound textbox
there is no error message in the code but the text box is empty

thank you
dovid

[twinnyfo]

That was unexpected--although I had not tried that before. based on how Access uses all other Objects, one could only assume the same would work for reports......

Is there a way you could establish a Global Variable using TempVars()? This could hold a value, then the Control Source for that Text box could be the value of the Variable.

Your Code to open the report would be:

Dim strReportName As String
strReportName = "This is Report A"
TempVars.Add "ReportName", strReportName
DoCmd.OpenReport "RptUnion", acViewPreview

Then, the Control Source for the Text box is:

= TempVars("ReportName")

Hope this hepps!

[Seth Schrock]

Instead of using a Tempvar, I would just add an OpenArgs to the DoCmd.OpenReport command and then use the report's OnLoad event to set the value of Title5 to the value in the OpenArgs property.

DoCmd.OpenReport "RptUnion", acViewPreview, , "Check = -1", , "This is Report A"

Then in the report's OnLoad event,

Me.Title5 = Me.OpenArgs

[twinnyfo]

Seth,

Good solution. I always forget about that option--which has been around forever--because I haven't had a need to use it.

Clearly the easier solution in this situation. Thanks!

[dovidg]

perfect, thanks for everything
dovid

[twinnyfo]

I would suggest selecting Post #5 as the answer for this thread....

[twinnyfo]

Your call to open the report would be:

DoCmd.OpenReport "RptUnion", acViewPreview, , "Check = -1", , 1 'or 2 or 3

The title is set in the OnOpen event as well.

[zmbd]

<Split second question into its own thread>
Handle Multiple Reporting Options

[dovidg]

took me a bit to get it to work but it's perfect
learned a lot of new options
thanks for everything
dovid