Exit a running procedure from the Called proceduer

[abi_learn_vba]

Hi,

I am running a procedure called as "Sub Report" which Calls another procedure and based on checking some condition in that i need stop all my running procedure. Can this be done? Within Same procedure i can use Exit Sub. But from another procedure.

Sub Report()

Call nwprocedure

End Sub

Sub nwprocedure

'on some condition
'need to exit all the procedure including "Sub report"

End Sub

Thanks
-Abi

 

[mikerickson]

There are a couple of ways, one would be to replace the subordinate Sub with a Function

Sub Main()
    Rem do stuff

    If SubordinateRoutine() = False Then Exit Sub

    Rem do the rest
End Sub

Function SubordinateRoutine() As Boolean
    Rem do something

    If BadThing then
        SubordinateRoutine = False
    Else
        SubordinateRoutine = True
    End If

End Function

The other methods would be very similar, just using global variables or a variable passed to SubordinateRoutine byRef.

 

[abi_learn_vba]

Thank you that helped me....

 

[Norie]

You can also use End, but that will stop all code execution.