Report. noData-Ereignis (Access)Report.NoData event (Access)

Das NoData-Ereignis tritt auf, nachdem Microsoft Access einen Bericht zum Drucken formatiert hat, der keine Daten enthält (der Bericht ist an eine leere Datensatzgruppe gebunden), aber bevor der Bericht gedruckt wird.The NoData event occurs after Microsoft Access formats a report for printing that has no data (the report is bound to an empty recordset), but before the report is printed. Sie können dieses Ereignis verwenden, um zu verhindern, dass ein leerer Bericht gedruckt wird.You can use this event to cancel printing of a blank report.

SyntaxSyntax

Ausdruck. NODATA (Abbrechen)expression.NoData (Cancel)

Ausdruck Eine Variable, die ein Report -Objekt darstellt.expression A variable that represents a Report object.

ParameterParameters

NameName Erforderlich/OptionalRequired/Optional DatentypData type BeschreibungDescription
AbbrechenCancel ErforderlichRequired IntegerInteger Diese Einstellung bestimmt, ob der Bericht gedruckt werden soll.The setting determines whether to print the report. Durch Festlegen des Cancel -Arguments auf true (1) wird verhindert, dass der Bericht gedruckt wird.Setting the Cancel argument to True (1) prevents the report from printing. Sie können das Drucken des Berichts auch mit der CancelEvent-Methode des DoCmd-Objekts unterbinden.You can also use the CancelEvent method of the DoCmd object to cancel printing the report.

BemerkungenRemarks

Soll ein Makro oder eine Ereignisprozedur ausgeführt werden, wenn dieses Ereignis eintritt, stellen Sie die OnNoData-Eigenschaft auf den Namen des Makros bzw. auf [Ereignisprozedur] ein.To run a macro or event procedure when this event occurs, set the OnNoData property to the name of the macro or to [Event Procedure].

Ist der Bericht nicht an eine Tabelle oder Abfrage gebunden (über die RecordSource-Eigenschaft des Berichts), tritt das NoData-Ereignis nicht auf.If the report isn't bound to a table or query (by using the report's RecordSource property), the NoData event doesn't occur.

Dieses Ereignis tritt nach den Format-Ereignissen für den Bericht, aber vor dem ersten Print-Ereignis auf.This event occurs after the Format events for the report, but before the first Print event.

Für Unterberichte tritt dieses Ereignis nicht auf.This event doesn't occur for subreports. Für den Fall, dass Sie Steuerelemente eines Unterberichts ausblenden möchten, wenn der Unterbericht keine Daten enthält, und Sie daher verhindern möchten, dass die Steuerelemente gedruckt werden, können Sie die HasData-Eigenschaft in einem Makro oder einer Ereignisprozedur verwenden, die ausgeführt wird, wenn das Ereignis Format oder Print auftritt.If you want to hide controls on a subreport when the subreport has no data, so that the controls don't print in this case, you can use the HasData property in a macro or event procedure that runs when the Format or Print event occurs.

Das NoData-Ereignis tritt vor dem ersten Page-Ereignis für den Bericht auf.The NoData event occurs before the first Page event for the report.

BeispielExample

Das folgende Beispiel zeigt, wie Sie das Drucken eines Berichts unterbinden können, wenn dieser keine Daten enthält.The following example shows how to cancel printing a report when it has no data. Außerdem wird ein Meldungsfeld angezeigt, das den Benutzer über den Abbruch des Druckvorgangs informiert.A message box notifying the user that the printing has been canceled is also displayed.

Zum Testen dieses Beispiels fügen Sie die nachstehende Ereignisprozedur zu einem Bericht hinzu.To try this example, add the following event procedure to a report. Versuchen Sie, den Bericht auszuführen, wenn er keine Daten enthält.Try running the report when it contains no data.

Private Sub Report_NoData(Cancel As Integer) 
    MsgBox "The report has no data." & _ 
         chr(13) & "Printing is canceled. " & _ 
         chr(13) & "Check the data source for the " & _ 
         chr(13) & "report. Make sure you entered " & _ 
         chr(13) & "the correct criteria (for " & _ 
         chr(13) & "example, a valid range of " & _ 
         chr(13) & "dates),." vbOKOnly + vbInformation 
    Cancel = True 
End Sub 

Das folgende Beispiel zeigt, wie das NODATA -Ereignis eines Berichts verwendet wird, um zu verhindern, dass der Bericht geöffnet wird, wenn keine Daten angezeigt werden sollen.The following example shows how to use the NoData event of a report to prevent the report from opening when there is no data to be displayed.

Private Sub Report_NoData(Cancel As Integer)

    'Add code here that will be executed if no data
    'was returned by the Report's RecordSource
    MsgBox "No customers ordered this product this month. " & _
        "The report will now close."
    Cancel = True

End Sub

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.