You can use this to turn on/off the report footer:
CODE
Me.ReportFooter.Visible = False
Depending on what will trigger the need to turn on or off the report footer, you could use something like the following
This example uses the Report Footer's On Format event:
CODE
Private Sub ReportFooter_Format(Cancel As Integer, FormatCount As Integer)
' if there no records then hide the report footer
If Me.HasData = True Then
Me.ReportFooter.Visible = True
Else
Me.ReportFooter.Visible = False
End If
End Sub
or
Simplified to
CODE
Private Sub ReportFooter_Format(Cancel As Integer, FormatCount As Integer)
' if there no records then hide the report footer
Me.ReportFooter.Visible = Me.HasData
End Sub
Hope this helps...