Hallo,
ich habe in ein Bericht/Report ein Ereignis wenn keine Daten vorhanden sind. Da Öffnet sich eine MSG Box mit Meldung das keine Daten vorhanden sind. Was auch super klappt.
Private Sub Report_NoData(Cancel As Integer)
Cancel = True
MsgBox "Keine Daten für diesen Zeitraum vorhanden" & Chr(13) & Chr(10) & "Bitte einen anderen Zeitraum auswählen"
End Sub
Jetzt möchte ich aber wenn man die OK Taste drückt es gleich ein Formular öffnet, wie bekomme ich hin.
Hat da jemand eine Idee ???
Danke
Hallo,
und Du hast keine Idee?
Private Sub Report_NoData(Cancel As Integer)
Cancel = True
If MsgBox ("Keine Daten für diesen Zeitraum vorhanden" & Chr(13) & Chr(10) & "Bitte einen anderen Zeitraum auswählen",vbOkCancel) = vbOk Then
Docmd.Openform "frm_MeinFormular"
End If
End Sub
Hallo DF6GL,
nee leider nicht. Hast du vielleicht eine?
Hallo,
und was steht in meinem Post?
Hallo DF6GL,
oh Sorry hatte ich übersehen. Werde das gleich mal Probieren.
Wünsche dann ein schönes Wochenende:-)
Hallo DF6GL,
habe es endlich geschaft deine Antwort zu Testen, und schaue da es klapt.
DAnke dir für deine Hilfe