Re run macro when error pops out

[nikhilrangarii]

hi,

I need to re run macro when this error message display in text box or message box pop out.

Run-time error '-2146697204(800c00c)'

This site report that request is not valid.

 

[jwalkerday]

Observe the following code. Basically you need to activate the on error function in the module where the error occurs; then add a error Handler which checks for the specific error you are looking for (I would use the error number but you can also use the error description) and finally add the relevant code to call the macro. Note- you may want to use the Application.Wait function Before attempting the rerun if the error relates to something like database availability.

Sub Macro1()
On Error GoTo Handler


x = 7 / 0 'cause error(divide by 0)




Handler:


'MsgBox Err.Number
    If Err.Number = 11 Then
    ' Code for handling the error is entered here.
    End If
End Sub

 

[nikhilrangarii]

Thanks for your kind help it works beautifully