Hi, I'm back
Actually I decided to do the VB code part.
This is how it works:
Dim dPageTotal As Double
Option Compare Database
--------------------------------------------------
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
dPageTotal = dPageTotal + Me.txtAmount
End Sub
--------------------------------------------------
Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
Me.txtAmtTot = dPageTotal
dPageTotal = 0
End Sub
Let me explain.
First of all, I created a Global Variable dPageTotal, This is were I will keep my page total accumlating.
Next at each 'record print' I will add the total of txtAmount (one of the fields in the report) to my dPageTotal.
Finally, when the report reaches the end of the page to print the page footer I put dPageTotal into a Text Box txtAmtTot; this amount will be printed in the page footer. Then I reset dPageTotal to 0 again preparing it for the next page.
Hope this of help and solves your problem.
Best regards,
Chronic