Page footer on print on last page of report (1 Viewer)

John thomas

Registered User.
Local time
Today, 02:29
Joined
Sep 4, 2012
Messages
206
Hi i have a report that I use for an Invoice
I have the price deposit balance due ect in the page footer
Tried the report Footer But it Moves up the page and doesnt look professional

The page footer is always in the right Place at the bottom of the Page .But if my invoice detail goes to 2nd or more pages I only want the page footer to PRINT ON THE LAST pAGE .

I have found this code that should do the job but i cant get it to work .

Now I am trying to Learn VBA so i Like to understand the code I am using
I am A Beginner .
Could someone please explain to me how this code works in very simple terms
Also i dont know were to put the code I have tried in the PageFooter print Event but it makes no diffe
rence

If Me .Page<>ME.Pages Then
Me.rptSub.Visible=False
Else
Me.rptSub.Visible=TRue
End IF
 

Cronk

Registered User.
Local time
Today, 19:29
Joined
Jul 4, 2013
Messages
2,774
Me.pages gives the total number of pages in the report. Me.Page indicates the current page being formatted. When Me.Page = Me.pages, then it indicates the last page is being printed.

Presumably, your report PageFooter is named rptSub so that the footer is hidden for all pages except the last page.

Put the code in the OnFormat event of the PageFooter
 

John thomas

Registered User.
Local time
Today, 02:29
Joined
Sep 4, 2012
Messages
206
Thanks
thats very helpful .Will try in format event
 

Users who are viewing this thread

Top Bottom