By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
435,519 Members | 2,295 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 435,519 IT Pros & Developers. It's quick & easy.

page footer STUMPER

P: n/a
I know the basics about access reports and putting page totals in the
page footers. What I can't figure out is along with the current page
total to display the previous page total:

At the bottom of every page:
Page 1 page footer:
Total brought forward= $0.00
Current Page total = $100.00
Grand Total= $100.00
Page 2 page footer:
Total brought forward= $100.00
Current Page total = $75.00
Grand Total = $175.00
Page 3 page footer
Total Brought forward= $175.00
Page Total= $20.00
Grand Total= $195.00
How can I get the the previous page total to display if the code
automatically resets
the page total to zero when it draws the next page?
Here is the code for doing the page totals in the page footer:
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
txtPageCashSum = txtPageCashSum + txtDonorCashAmmount
txtPageCheckSum = txtPageCheckSum + txtDonorCheckAmmount
End Sub
Private Sub PageHeaderSection_Print(Cancel As Integer, PrintCount As
Integer)
txtPageCashSum = 0
txtPageCheckSum = 0
End Sub

Aug 28 '06 #1
Share this Question
Share on Google+
2 Replies


P: n/a
It won't. You need to either add groups to your report and subtotal by
group, or just total by report.

CaptainDahlin wrote:
I know the basics about access reports and putting page totals in the
page footers. What I can't figure out is along with the current page
total to display the previous page total:

At the bottom of every page:
Page 1 page footer:
Total brought forward= $0.00
Current Page total = $100.00
Grand Total= $100.00
Page 2 page footer:
Total brought forward= $100.00
Current Page total = $75.00
Grand Total = $175.00
Page 3 page footer
Total Brought forward= $175.00
Page Total= $20.00
Grand Total= $195.00
How can I get the the previous page total to display if the code
automatically resets
the page total to zero when it draws the next page?
Here is the code for doing the page totals in the page footer:
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
txtPageCashSum = txtPageCashSum + txtDonorCashAmmount
txtPageCheckSum = txtPageCheckSum + txtDonorCheckAmmount
End Sub
Private Sub PageHeaderSection_Print(Cancel As Integer, PrintCount As
Integer)
txtPageCashSum = 0
txtPageCheckSum = 0
End Sub
Aug 28 '06 #2

P: n/a
"ManningFan" <ma********@gmail.comwrote in
news:11**********************@m73g2000cwd.googlegr oups.com:
It won't. You need to either add groups to your report and
subtotal by group, or just total by report.
Total bogosity. All it takes is a little VB code.

In the reports declarations section define three variables
PbfTTL, PgTtl and RptTtl.for your three totals.

In the Page header format Event, set
PgTtl = 0
In the Detail Format Event, update two variables
PgTtl = PgTtl + me.fieldToTotal
RptTtl = RptTtl + me.fieldToTotal
In the page footer, total brought forward is RptTtl - PgTtl

Bob Q

CaptainDahlin wrote:
>I know the basics about access reports and putting page
totals in the page footers. What I can't figure out is along
with the current page total to display the previous page
total:

At the bottom of every page:
Page 1 page footer:
Total brought forward= $0.00
Current Page total = $100.00
Grand Total= $100.00
Page 2 page footer:
Total brought forward= $100.00
Current Page total = $75.00
Grand Total = $175.00
Page 3 page footer
Total Brought forward= $175.00
Page Total= $20.00
Grand Total= $195.00
How can I get the the previous page total to display if the
code automatically resets
the page total to zero when it draws the next page?
Here is the code for doing the page totals in the page
footer:
Private Sub Detail_Print(Cancel As Integer, PrintCount As
Integer)
txtPageCashSum = txtPageCashSum + txtDonorCashAmmount
txtPageCheckSum = txtPageCheckSum +
txtDonorCheckAmmount
End Sub
Private Sub PageHeaderSection_Print(Cancel As Integer,
PrintCount As Integer)
txtPageCashSum = 0
txtPageCheckSum = 0
End Sub



--
Bob Quintal

PA is y I've altered my email address.

--
Posted via a free Usenet account from http://www.teranews.com

Aug 28 '06 #3

This discussion thread is closed

Replies have been disabled for this discussion.