Member
Beiträge: 22
| Liebes Forum,
ich habe folgende Fehlerroutine aufgebaut:
Private Sub Form_Error(DataErr As Integer, Response As Integer)
Select Case Err
Case 0 And 3314
MsgBox "Der von Ihnen eingegebene FELDINHALT ist ungültig!" & vbCrLf & vbCrLf & "Bitte geben Sie einen korrekten Wert ein!", vbOKOnly + vbCritical, "Falscheingabe FELDINHALT!"
Response = acDataErrContinue
Case Else
MsgBox Err
End Select
ActiveControl.Undo
End Sub
Mein problem ist nun, dass die Fehlermeldung teilweise zweimal hintereinander erscheint. Kann ich das noch irgendwie umgehen?
Wäre nett, wenn ich Hilfe bekommen würde - vorab vielen Dank! |