Access-Beispiele

Verhindern Sie einen Bericht öffnen, wenn keine Daten zu zeigen,

Wir können verhindern, einen Bericht zu öffnen, wenn keine Daten zu zeigen, und dafür verwenden wir zwei Formen abhängig von der Version von Access:

1 - Alle Versionen von Access
Setzen Sie den nachfolgenden Code in den Eigenschaften des Berichts, die Veranstaltung 'Enabling'

Verwenden Sie das Ereignis Enabling (Aktivieren) Bericht:

Private Sub Report_Activate ()

Wenn DomAnzahl ("*", Me.RecordSource) = 0 Then

MsgBox "keine Aufzeichnungen angezeigt" vbDefaultButton1, "Fehler!"

AcReport DoCmd.Close, "Name des Berichts"

End If

End Sub

2 - Ab der Version 7 (Access 95) wurde das Ereignis hinzugefügt ', wenn keine Daten', dann haben wir den folgenden Code können urilizar:

Private Sub Report_NoData (Cancel As Integer)

MsgBox "Keine Daten in dem Bericht.", VbInformation, "Error!"

Cancel = True

End Sub

Um zu sehen, läuft Laden Sie das Beispiel: Verhindern Eröffnung Bericht

Posted in Allgemein | 13 Kommentare »