Conditional Format & Print Code doesn't fire report

[papic1972]

Hi All,

I have written the following code in my PageFooterSection_Format & PageFooterSection_Print events, it all looks ok to me but my report doesn't fire when i try to open it, nothing happens!! Can someone spot if i'm missing something?

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
If Me.CustomerType = "Cash Sale" Then
Me.NAB.Visible = True
Me.westpac.Visible = False
Else
If Me.CustomerType = "Account" Then
Me.NAB.Visible = False
Me.westpac.Visible = True
Else
If Me.CustomerType = "14 Day Account" Then
Me.NAB.Visible = False
Me.westpac.Visible = True
Else
Me.NAB.Visible = False
Me.westpac.Visible = False
End If
End If
End If
End Sub
--------------------------------------------------------------------
Private Sub PageFooterSection_Print(Cancel As Integer, PrintCount As Integer)
If Me.CustomerType = "Cash Sale" Then
Me.NAB.Visible = True
Me.westpac.Visible = False
Else
If Me.CustomerType = "Account" Then
Me.NAB.Visible = False
Me.westpac.Visible = True
Else
If Me.CustomerType = "14 Day Account" Then
Me.NAB.Visible = False
Me.westpac.Visible = True
Else
Me.NAB.Visible = False
Me.westpac.Visible = False
End If
End If
End If
End Sub


Many thanks!!!

 

[way2bord]

Does it work in print preview?

Apparently conditional formatting doesn't apply to Report View.

 

[papic1972]

No, the report just doesn't fire in any view. I don't get it!