View Single Post
  #5  
Old May 20th, 2010, 12:06 AM posted to microsoft.public.access.reports
Dwade
external usenet poster
 
Posts: 17
Default Report - Don't print the page footer on the last page

Cancel = (Me.Page = Me.Pages) worked fine

the other one

Me.Section(4).Visible = (Me.Page Me.Pages)

for some reason won't work (probably a typo or something simple on my part)

"Marshall Barton" wrote:

Right. Did you try my last suggestion?
--
Marsh
MVP [MS Access]


Dwade wrote:
I want the report footer to print without printing the page footer on the
final page. Any other page prior the footer can and should print. I just want
to suppress the page footer on the final page.

The report footer contains signature block.

"Marshall Barton" wrote:

Dwade wrote:

When I print a report I don't want the page footer to print at the end of the
report
I only want the report footer to print

The page header must print on each page.

The report is for a donation report. Grouped off donation Id, can have any
number of items on each report 1 to xxx,xxx,x though the maxiumum so far is
25 items. which rolls the report to 2 pages.

The report footer contains a signature block and also the same line as the
page footer.
Page footer (="Print Date: "&Now() ="page" & [Page]&" of "&[Pages]


To reclaim the space used by the page footer, you need to
make it invisible no later than the page header section's
Format or Print event:

Me.Section(4).Visible = (Me.Page Me.Pages)

BUT, if things line up just the wrong way where the details
an report footer will fit on the last page if there is no
footer and not fit if there is a footer, you can get strange
things like Page 2 of 3 or Page 3 of 2 on the last page or
the footer all by itself on the last page.

If you do not care about reclaming the page footer space,
then just use a line of code in the page footer's Format or
Print event:
Cancel = (Me.Page = Me.Pages)

.