Error 3022 Abfangen

[derdem]

ACCESS 2010

Hi Leute


Private Sub Form_Error(DataErr As Integer, Response As Integer)
    On Error Resume Next
   
   
    Select Case DataErr
    Case 3022
        Response = acDataErrContinue
        MsgBox " Doppelte Datensätzte sind nich zulässig"
        Me.Undo
           
    Case Else
        Response = acDataErrDisplay
      '  Me.Undo
    End Select
   
End Sub

Private Sub Kombinationsfeld99_AfterUpdate()
'On Error MsgBox Text100
'On Error GoTo error_melder
'On Error Resume Next
'On Error GoTo Form_Error
Call Form_Angebote.alle_proceduren_starten
'Me.Requery    'geht ohne Fehlerformular
'DoCmd.GoToRecord , , acNewRec 'geht ohne Fehlerformular
DoCmd.RunCommand acCmdRecordsGoToNew

End Sub

Das ist mein Code

Die Fehlermeldung die ich gebaut habe Funktioniert soweit ....
aber mein AfterUpdate Prozedure ignoriert das einfach

DoCmd.RunCommand acCmdRecordsGoToNew
wenn ich das hinschreibe geht die Fehlermeldung nicht richtig, wenn ich es weck lasse komme ich nicht in den nächsten Datensatzt
ich muss aber automatisch in den Datensatzt springen ....

Danke für die Hilfe 

[MzKlMu]

Hallo,
siehe auch:
http://www.ms-office-forum.net/forum/showthread.php?t=274207

Grossposting (gleichzeitiges Fragen in mehreren Foren) ist hier unerwünscht, im anderen Forum auch. Kannst Du in den Regeln nachlesen.

[derdem]

Ja sry 
aber das Problem lässt sich ja nicht lösen und ich dachte bzw. denke hier in dem Forum sind mehr leute die mir helfen können

[derdem]

Sry nochmal für das Grossposting 



ich konnte mein problem selbst beheben

für alle die ein gleiches Problem haben

http://www.ms-office-forum.net/forum/showthread.php?p=1355663