Is there a way to show a total calculated in the details section in the header?

[bamski92]

Hello, im very new to using access and have been getting by with examples and trial and error so far but i cant figure this out.


I'm calculating the page total in the details section and I would like to have it shown in the header also.

The code for my report is:

"Option Explicit

Dim curTotal As Currency

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)

If PrintCount = 1 Then curTotal = curTotal + Me.rcrdAmount

End Sub

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

Me.pgTotal = curTotal

End Sub

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

curTotal = 0

End Sub"

I was trying to reference pgTotal as the source for an unbounded text box in the header but since the header prints first it prints the first pages total on the second pages header.

Is it possible to do what I'm trying to do?

[Bob Fitz]

Try using the OnFormat event rather that the OnPrint event.

[bamski92]

I tried using the OnFormat event and it doesn't seem to have changed anything.

[Bob Fitz]

can you post a copy o the db

[bamski92]

Sorry, the database I'm working on isn't mine so I recreated the parts I'm working with that are giving me trouble.

[Bob Fitz]

Sorry, the database I'm working on isn't mine so I recreated the parts I'm working with that are giving me trouble.

Try the attached db. Post back with any questions you may have.

[bamski92]

Apologies, I didn't have enough data in the table to properly show the problem I'm trying to solve.
Additionally I was missing a command line for the button on the form.