1: 2: 3: 4: 5: 6: 7: 8: 9:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) If Me.txtPage = 1 Then Me.PageFooterSection.Visible = True Else Me.PageFooterSection.Visible = False End If End Sub