Print page footer only on the first page (1 Viewer)

Akai90

Member
Local time
Today, 17:54
Joined
Feb 8, 2022
Messages
65
hi,

i have some text in footer section but i want to show only page 1 and hide on page 2

on print preview it got like what i want but when print the report on footer text not show anything..

the code i use
Code:
Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
Me.PageFooterSection.Visible = (Me.[Page] = 1)
End Sub

Private Sub PageFooterSection_Print(Cancel As Integer, PrintCount As Integer)
Me.PageFooterSection.Visible = (Me.[Page] = 1)
End Sub
 

Ranman256

Well-known member
Local time
Today, 05:54
Joined
Apr 9, 2015
Messages
4,337
These work for me.
only page 1 shows the section data.

Code:
  'PAGE FOOTER
Private Sub PageFooterSection_Print(Cancel As Integer, PrintCount As Integer)
Me.PageFooterSection.Visible = (Me.[Page] = 1)
End Sub
 

Akai90

Member
Local time
Today, 17:54
Joined
Feb 8, 2022
Messages
65
These work for me.
only page 1 shows the section data.

Code:
  'PAGE FOOTER
Private Sub PageFooterSection_Print(Cancel As Integer, PrintCount As Integer)
Me.PageFooterSection.Visible = (Me.[Page] = 1)
End Sub
for print preview it work... when i hit print button no value on "PageFooterSection" print
 

Akai90

Member
Local time
Today, 17:54
Joined
Feb 8, 2022
Messages
65
Code:
Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
Me.PageFooterSection.Visible = (Me.[Page] = 1)
End Sub

problem solved
remove above code use only
Code:
Private Sub PageFooterSection_Print(Cancel As Integer, PrintCount As Integer)
Me.PageFooterSection.Visible = (Me.[Page] = 1)
End Sub
 

gemma-the-husky

Super Moderator
Staff member
Local time
Today, 10:54
Joined
Sep 12, 2006
Messages
15,656
I'm not saying it is this, but if you preview, and then print, counters don't always reset to zero. so you might not be getting a page 1 when you print. Get your code to display the pageno to check.
 

Users who are viewing this thread

Top Bottom