access-vba Access Error Codes (Form.Error, DataErr) Trap All Errors
Example
Basic error handling should be added to all procedures in production code, since otherwise an unexpected error will cause Access to crash or invite the end-user to enter debug mode.
A typical pattern for a basic error handler that traps all errors is:
Sub Name()
On Error GoTo errHandler
'[some code...]
exitHandler:
'Clean up any objects
Exit Sub
errHandler:
Select Case Err.Number
'Any expected error cases go here
Case Else
MsgBox Err.Number & Err.Description
End Select
Resume exitHandler 'Make sure objects get cleaned up when code threw an error
End Sub
For a more detailed discussion of error handling in Access VBA, see:
- Error Handling in VBA, by Allen Browne
- Error Handling and Debugging Tips and Techniques for Microsoft Access, VBA, and Visual Basic 6 (VB6), by Luke Chung
