Close a report automatically if it does not contain any records

The following example shows how to use the NoData event to cancel opening or printing a report when it has no data. A message box notifying the user that the report has no data is also displayed.

Private Sub Report_NoData (Cancel As Integer) 
     
    ' Display message to user. 
    MsgBox "There are no records to report", vbExclamation, "No Records" 
 
    ' Close the report. 
    Cancel = True 
 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.