Using the Resume Statement to Specify Where Execution Continues After an Error Occurs : Error Handler « Language Basics « VBA / Excel / Access / Word






Using the Resume Statement to Specify Where Execution Continues After an Error Occurs

 
Sub TestResumeLineLabel()
    On Error GoTo TestResumeLineLabel_Err
    Dim sngResult As Single
    sngResult = 1 / 0
TestResumeLineLabel_Exit:
    Exit Sub
TestResumeLineLabel_Err:
    msgBox "Error #" & Err.number & ": " & Err.Description
    Resume TestResumeLineLabel_Exit
End Sub

 








Related examples in the same category

1.An Example of Code Without Error Handling
2.A Simple Error-Handling Routine
3.An Example of Error Handling Using the On Error GoTo Statement
4.Ignoring an Error and Continuing Execution
5.Using Resume Conditionally Based on User Feedback
6.Placing a Resume Next Statement in Your Error Handler
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