on error msg box help

  • Thread starter Thread starter Matthew Dyer
  • Start date Start date
M

Matthew Dyer

The following code will return a message box whether or not an error
results from running the macro... what gives?

Sub test()
On Error GoTo errr
Range("a2").Value = Range("A1") / Range("B1")
errr: MsgBox "error", vbOKOnly, Error
End Sub
 
You have to do something else if no error. Exiting is an option.

Sub test()
On Error GoTo errr
Range("a2").Value = Range("A1") / Range("B1")
Exit Sub
errr: MsgBox "error", vbOKOnly, Error
End Sub


Gord Dibben MS Excel MVP
 
You have to do something else if no error.  Exiting is an option.

Sub test()
    On Error GoTo errr
    Range("a2").Value = Range("A1") / Range("B1")
    Exit Sub
errr:     MsgBox "error", vbOKOnly, Error
End Sub

Gord Dibben  MS Excel MVP




- Show quoted text -
Click to expand...

The only reason the msg box doesnt appear with the exit sub command is
because the sub is exited before the msgbox command is reached. can
anyone please explain why a msgbox command in an on error goto command
brings up a msgbox whether or not an error occurs? Would putting this
in a if iserror statement make it work?
 
Back
Top