A Simple Error-Handling Routine : Error Handler « Language Basics « VBA / Excel / Access / Word






A Simple Error-Handling Routine

 
Sub TestError2()
On Error GoTo TestError2_Err
    Debug.Print 1 / 0
    msgBox "I am in Test Error"
    Exit Sub
TestError2_Err:
    If Err = 11 Then
        msgBox "Variable 2 Cannot Be a Zero", , "Custom Error Handler"
    End If
    Exit Sub
End Sub

 








Related examples in the same category

1.An Example of Code Without Error Handling
2.An Example of Error Handling Using the On Error GoTo Statement
3.Ignoring an Error and Continuing Execution
4.Using Resume Conditionally Based on User Feedback
5.Placing a Resume Next Statement in Your Error Handler
6.Using the Resume Statement to Specify Where Execution Continues After an Error Occurs
7.Looking Up the Call Stack for a Previous Error Handler
8.Read user choice when dealing with error
9.error handling by checking the Error code
10.EBEngine.Errors