Hi all,

How do you kill all procedures on an error?

I have a procedure that calls a series of other procedures. I have error code in each of those sub procedures that will kill that sub procedure if there is an error within that sub procedure, but the main procedure thread still keeps firing off. 



Private Sub MasterList_click()

'procedure code here'

Call SubP1
Call SubP2

End sub


Private SubP1()

On Error Goto Handler1
     Exit Sub
Handler1:
     MsbBox "An error has occured, exiting procedure"

'sub procedure code here'

End Sub

But SubP2 still fires off, as well as anything else downstream of SubP1 in MasterList even if SubP1 errors out and is killed properly.

So what can I insert into the error handler in SubP1 that will kill all procedures entirely?