Show textbox on last page of report

carlosdsousa

Registered User.
Local time
Today, 06:14
Joined
Oct 12, 2004
Messages
12
i to all

i have a textbox [total] in footer that shows the sum of field

what i want is to show the textbox only in the last page of the report

by default [total].visible = false

when last page... [total].visible=true

any idea on to do this

thanks for your time and replays
 
Are you using the unbound text box in report footer for =sum([FieldName])?

hth,
Michael
 
If Me.Page = Me.Pages Then
Me.SomeControl.Visible=True
Else
Me.SomeControl.Visible=False
End If
 
thanks for the reply

Public PageSum As Double

...
Private Sub Report_Open(Cancel As Integer)
(...)
PageSum=0
(...)
End Sub

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
(...)
PageSum = PageSum + [TEMPO]
(...)
End Sub

Private Sub PageFooterSection_Print(Cancel As Integer, PrintCount As Integer)
If Me.Page = Me.Pages Then
[Total] = PageSum
End If
End Sub

thats what i have concerning the topic

but me.page and me.pages return 0
 
Last edited:

Users who are viewing this thread

Back
Top Bottom