Private Sub ReportFooter_Format(Cancel As Integer, FormatCount As Integer)
Dim intCount As Integer
intCount = DCount("Contact_ID", "tbl_Contact")
If intCount < 241 Then
Cancel = True
End If
End Sub
[I]' Note: the above works for me. Could have created a temporary SQL statement and acheive the same result.
' For the particular report in question, Contact_ID has nothing to do with the report.
[/I]