Testing [Pages] no longer works in footer format event

[GraeagleBill]

One of my app's reports previously executing successfully now getting an error.




The most recent change to the report was the inclusion of a group. If I disable the OnFooterFormat the report displays properly. I don't know what difference a group would make regarding Access' setting of [Pages]. (Me.tbPages is the text-box mentioned in the event code comment.)

Any ideas?

[ranman256]

Instead of the OnFormat event, try the OnPrint event.
put this as the 1st Line in the sub:

on error resume next

[GraeagleBill]

The code below functions correctly in either of the Format OR Print events. The problem was in the reference to the value of a text box, (If Me.Page = Me.tbPages Then). The direct reference to the builtin "Pages" function cleared things up.

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
' We only want the report's signature line on the last page.
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
    If Me.Page = Pages Then
        Me.lblSigLine.Visible = True
        Me.lblSignature.Visible = True
    Else
        Me.lblSigLine.Visible = False
        Me.lblSignature.Visible = False
    End If

End Sub