Can I print report footer at end of page

J

John

I have an invoice report which can have varying amounts of purchases,
sometimes extending over several pages. I have the totals for each invoice
in the footer section of the report. My problem is that the footer will
display directly underneath the last item in the detail section which can be
anywhere on the page.
Is it possible to have the footer print at the bottom of whichever page it
appears. Or alternatively to display the totals in the page footer of the
last page.

Thanks
JOhn
 
M

Marshall Barton

John said:
I have an invoice report which can have varying amounts of purchases,
sometimes extending over several pages. I have the totals for each invoice
in the footer section of the report. My problem is that the footer will
display directly underneath the last item in the detail section which can be
anywhere on the page.
Is it possible to have the footer print at the bottom of whichever page it
appears. Or alternatively to display the totals in the page footer of the
last page.


The real problem is that you are trying to imitate a
handwritten paper invoice that had spaces for purchases and
the total at the end of the blank lines. Other than old
thoughts about how it used to be done, there is nothing
wrong about the totals appearing after the last purchase.
But, your company is probably not going to change its mind
about that, so you are stuck trying to munge your report to
have the traditional look.

There are a couple of convoluted approaches to this, but I
think using the Page footer is the easiest. For each text
box in the report footer, add a text box to the page footer.
Make these text boxes invisible so they don't show on any
other than the last page. Set their control source
expression to =corresponfingreportfootertextbox

Now, to make this visible on the last page, you need a text
box somewhere in the report that refers to the Pages
property (the usual =Page & " of " & Pages text box is fine
for this purpose). The you can add code to the page footer
Format event to make the text boxes visible on the last
page:

If Me.Page = Me.Pages Then
Me.txta.Visible = True
Me.txtb.Visible = True
. . .
End If
 
J

John

Thanks, I'll give that a try.

John


Marshall Barton said:
The real problem is that you are trying to imitate a
handwritten paper invoice that had spaces for purchases and
the total at the end of the blank lines. Other than old
thoughts about how it used to be done, there is nothing
wrong about the totals appearing after the last purchase.
But, your company is probably not going to change its mind
about that, so you are stuck trying to munge your report to
have the traditional look.

There are a couple of convoluted approaches to this, but I
think using the Page footer is the easiest. For each text
box in the report footer, add a text box to the page footer.
Make these text boxes invisible so they don't show on any
other than the last page. Set their control source
expression to =corresponfingreportfootertextbox

Now, to make this visible on the last page, you need a text
box somewhere in the report that refers to the Pages
property (the usual =Page & " of " & Pages text box is fine
for this purpose). The you can add code to the page footer
Format event to make the text boxes visible on the last
page:

If Me.Page = Me.Pages Then
Me.txta.Visible = True
Me.txtb.Visible = True
. . .
End If
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top