Conditionally Supress Footer

[mtownbound]

So trying to conditionally suppress group footers with the following, in the On Format event, but it's still showing all footers:

GroupFooter0.Visible = (txtBrand = "Nike")



Thanks

 

[dhookom]

Where did you place the code you provided?

I would place code in the On Format event of the GroupFooter

Cancel = (txtBrand = "Nike")

Duane
Hook'D on Access
MS Access MVP

 

[mtownbound]

in the On Format event

 

[mtownbound]

Tried in the On Fromat event, but the footer is still showing with:

Cancel = (txtBrand = "Nike")

 

[dhookom]

Please post your complete code. Also add debug.print like:

Debug.Print "Me.txtBrand: " = Me.txtBrand
Cancel = (Me.txtBrand = "Nike")

Duane
Hook'D on Access
MS Access MVP

 

[mtownbound]

Private Sub GroupFooter0_Format(Cancel As Integer, FormatCount As Integer)

Cancel = (txtBrand = "Nike")

End Sub

 

[dhookom]

mtownbound,
[ol 1]
[li]What are the results of the debug.print?[/li]
[li]Does your code compile?[/li]
[li]Do you have a text box named txtBrand?[/li]
[li]Is it actually a text box or combo box?[/li]
[li]Can you please prefix your control names with "Me."?[/li]
[/ol]

Duane
Hook'D on Access
MS Access MVP

 

[mtownbound]

Not isolated to just this report. Tried this code on several different reports and it isn't working on any of the text boxes (prefixed them all with Me.).

 

[dhookom]

What view are you opening report view or print preview?

I asked a bunch of questions which seem to have been ignored :-(.

Duane
Hook'D on Access
MS Access MVP

 

[mtownbound]

It compiles with no problem; it's actually a text box called txtBrand; prefixed with "Me." Opening with report view.

 

[dhookom]

Use print preview if you want code to run.

Duane
Hook'D on Access
MS Access MVP

 

[mtownbound]

That did it. Thanks!