レコードが含まれないレポートの印刷をキャンセルする

Microsoft Office.com より引用

　既定では、レコードが含まれないレポートの印刷が可能です。この問題を解決するには、マクロを使用するか、Microsoft Visual Basic for Applications (VBA) コードを使用して、レポートにレコードがあるかどうかを確認してから、印刷操作をキャンセルします。

■　VBA コードを使用して印刷をキャンセルする

［空データ時］のイベントプロシージャで、「Cancel = True」にする。

Private Sub Report_NoData (Cancel As Integer)
  MsgBox "There are no records to report", vbExclamation, "No Records"
  Cancel = True
End Sub