Beim direkten Ausdruck eines Berichts auf einem Drucker kann es schon einmal ärgerlich sein, wenn aufgrund eines falschen Filterkriteriums keine Datensätze gedruckt werden. Der Ausdruck war damit umsonst.
Setzen Sie die Bei Ohne Daten-Eigenschaft ein, um die Ausgabe leerer Berichte zu verhindern.
Die folgende Beispielprozedur zeigt eine Meldung an, falls der Bericht keine Daten enthält. Der Ausdruck wird nach entsprechender Bestätigung vom Benutzer durch Setzen der Variablen Cancel auf den Wert True abgebrochen.
Private Sub Report_NoData(Cancel As Integer)
If MsgBox("Dieser Bericht enthält keine Daten." & vbCrLf & "Möchten Sie den Vorgang abbrechen?", _
vbYesNo Or vbExclamation) = vbYes Then
Cancel = True
End If
End Sub