Need report footer to print at bottom of last page

  • Thread starter Thread starter Guest
  • Start date Start date
I know there is a way to do it. Just can't seem to make it happen. Help!
Click to expand...

Make your report as you normally would with the Page Footer and Report
Footer.

Make sure there is a control set to = [Page] & " of " & [Pages] in the
Page Footer.

Then for each control you wish to display on the final page footer,
place an unbound control where it should display.
Set each of these controls Visible properties to No.
(Do not disturb the controls you want to normally display at the
bottom of each page.

Next code the Report' Page Footer Format event:
If [Page] = [Pages] Then
[PageFooterControlName1] = [ReportFooterControlName1]
[PageFooterControlName1].Visible = True
' Do the same for each other ReportFooter control you wish to show
in the Page Footer.
End If

If you have other controls in the page footer that you do not wish to
display on the final page, set them to Not Visible in the Page Footer
event.

You must leave enough Page Footer Height to print these controls.
I see no reason you can't stack these controls on top of your regular
page footer controls and turn Visible properties on and off as
required.

Next code the Report Footer's Format event:
Cancel = True


Then code the Report Header Format event:

[PageFooterControlName1].Visible = False
' Do the same for each other ReportFooter control you wish to show
in the Page Footer.


The Report Footer information should display at the bottom of the
report where the Page footer normally does.
 
This worked perfectly. Looks great. Thanks for the help.
This is the page footer format event.


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

If [Page] = [Pages] Then
[bemisimage].Visible = True
[chicagoimage].Visible = True
[cpfimage].Visible = True
[caddyimage].Visible = True
[ericoimage].Visible = True
[hammondimage].Visible = True
[eljerimage].Visible = True
[musteeimage].Visible = True
[metaimage].Visible = True
[josamimage].Visible = True
[mcgimage].Visible = True
[oasisimage].Visible = True
[rheemimage].Visible = True

End If

End Sub


fredg said:
I know there is a way to do it. Just can't seem to make it happen. Help!
Click to expand...

Make your report as you normally would with the Page Footer and Report
Footer.

Make sure there is a control set to = [Page] & " of " & [Pages] in the
Page Footer.

Then for each control you wish to display on the final page footer,
place an unbound control where it should display.
Set each of these controls Visible properties to No.
(Do not disturb the controls you want to normally display at the
bottom of each page.

Next code the Report' Page Footer Format event:
If [Page] = [Pages] Then
[PageFooterControlName1] = [ReportFooterControlName1]
[PageFooterControlName1].Visible = True
' Do the same for each other ReportFooter control you wish to show
in the Page Footer.
End If

If you have other controls in the page footer that you do not wish to
display on the final page, set them to Not Visible in the Page Footer
event.

You must leave enough Page Footer Height to print these controls.
I see no reason you can't stack these controls on top of your regular
page footer controls and turn Visible properties on and off as
required.

Next code the Report Footer's Format event:
Cancel = True


Then code the Report Header Format event:

[PageFooterControlName1].Visible = False
' Do the same for each other ReportFooter control you wish to show
in the Page Footer.


The Report Footer information should display at the bottom of the
report where the Page footer normally does.
Click to expand...
 
heyy..I work with Business Intelligence Report.I want to see my page footer
only last page. How can I do it? you wrote something:
If [Page] = [Pages] Then
[PageFooterControlName1] = [ReportFooterControlName1]
[PageFooterControlName1].Visible = True

etc .etc.

and you said "format event".but I cant see it.Where is "format event"? pls
help me.
 
heyy..I work with Business Intelligence Report.I want to see my page footer
only last page. How can I do it? you wrote something:
If [Page] = [Pages] Then
[PageFooterControlName1] = [ReportFooterControlName1]
[PageFooterControlName1].Visible = True

etc .etc.

and you said "format event".but I cant see it.Where is "format event"? pls
help me.
Click to expand...

Add a control to the page footer that will compute [Pages].
Something like = [Pages]
or = "Page " & [Page] & " of " & [Pages].
You can make it not visible if you don't wish to display it.

To find the Page Footer Format event, in Report Design View display
the Report's property sheet.
Right-click on the bar that says Page Footer.
Select Properties.
Click on the Event tab of the property sheet.
Click on the On Format line and write [Event Procedure].
Then click on the little button with the 3 dots that appears on that
line.
When the code window opens, the cursor will be flashing between two
already existing lines of code.
Between those lines, write:

Cancel = Not [Page] = [Pages]

Exit the code window.
Run the report. The Page Footer should only appear on the last page of
the report.
 
Back
Top