Access: Aussagekräftige Fehler-Routine

AccessVBA

Meistens sind die Standard-Fehlermeldungen von Access nicht ausreichend bzw. es wird bei der Access-Runtime gar nichts angezeigt außer Laufzeitfehler.
Abhilfe kann eine aussagekräftige Fehlermeldung sein.
Diese einfach in die gewünschte Prozedur einbauen. Hier ein Beispiel:

Private Sub Befehl2_Click()
On Error GoTo Error_Function
'On Error Resume Next
   'Hier die normale Prozedur / VBA-Code
   DoCmd.OpenTable "tbl_test"
Exit_Function:
   Exit Sub
Error_Function:
   MsgBox "Fehler: " & Err.Number & vbCrLf & Err.Description
   Resume Exit_Function
End Sub