make subreport2 visible based on condition

O

Opal

Help, I am running Access 2003 and have
trouble getting this work right.

I have an unbound subreport that contains 3
additional subreports. I want only one of the 3
to be visible based on the value in a combo
box on a selection form. I can't seem to get
the reference right and have tried several
variations.

If Forms!frmWeeklyGLrpt!cboCC = 1 Then
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDA.Visible = True
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDB.Visible = False
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDC.Visible = False
End If
If Forms!frmWeeklyGLrpt!cboCC = 2 Then
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDA.Visible = False
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDB.Visible = True
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDC.Visible = False
End If
If Forms!frmWeeklyGLrpt!cboCC = 3 Then
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDA.Visible = False
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDB.Visible = False
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDC.Visible = True
End If

I keep getting Runtime error 2455
"You entered an expression that has an invalid reference to the
property
Form/Report."

Can anyone help me out?
 
M

Marshall Barton

Opal said:
Help, I am running Access 2003 and have
trouble getting this work right.

I have an unbound subreport that contains 3
additional subreports. I want only one of the 3
to be visible based on the value in a combo
box on a selection form. I can't seem to get
the reference right and have tried several
variations.

If Forms!frmWeeklyGLrpt!cboCC = 1 Then
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDA.Visible = True
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDB.Visible = False
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDC.Visible = False
End If
If Forms!frmWeeklyGLrpt!cboCC = 2 Then
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDA.Visible = False
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDB.Visible = True
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDC.Visible = False
End If
If Forms!frmWeeklyGLrpt!cboCC = 3 Then
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDA.Visible = False
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDB.Visible = False
Me!subrptGLWeekly.Report!subrptGLWeeklyCMRDC.Visible = True
End If

I keep getting Runtime error 2455
"You entered an expression that has an invalid reference to the
property Form/Report."
Click to expand...

I think that happens if your code is in the main report's
Open event. Try moving it to the report header's Print
event or maybe you need it in the main report section that
contains the subrptGLWeekly subreport.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Collapse columns to left if visible = false 3
Resize columns on report to match form and move columns left toremove gaps 1
Hiding Subreports in Mainreport via Form 2
Change report width based on total columns widths 3
Grouping and Sorting a Report On Open Event 3
Pulling data to a report based on double filter 1
excel vba can't make Monthview visible 0
Reports Columns Help/Field Name Help 3

Top