How do you stop a procedure by click another button. I want to be able to
click button2 to stop the procedure being run by button1.

Private Sub button1_Click()
runingProcedure
End Sub

Private Sub button2_Click()
stop runingProcedure
End Sub