Page footer to print on the 1st page only (1 Viewer)

[sponsoraw]

Hi guys, I know that question was asked before, but the answers I've seen didn't worked for me.

I've used the following code on the footer on print procedure:
Private Sub PageFooterSection_Print(Cancel As Integer, PrintCount As Integer)
Me.PageFooterSection.Visible = (Me.[Page] = 1)
End Sub

This works fine when you view it in print preview, but the footer don't show up at all when you actually print it.

The reports default view itself is set print preview.

Any ideas?
Thanks
Adrian

 

[billmeye]

Try:

If Me.Page > 1 Then Me.PageFooterSection.visible = False

 

[sponsoraw]

Try:

If Me.Page > 1 Then Me.PageFooterSection.visible = False

Thanks for your suggestion. It does work on the print preview only. Once printed the footer is not showing at all.

HELP

 

[billmeye]

have you tried putting the code in the On Format event?