How can SUB know that it was called?

**sauerj** · 09-30-2010, 08:15 PM

What is the easiest way for a SUB to know that it was called by other macro?
Right now, I use the following technique (and send a TRUE to 'Called' if so, else FALSE), but there has to be a more direct way. ... Any ideas?

Sub CallingSub()
   blah ... blah ... blah
  Call CalledSub(Called:=True)
   blah ... blah ... blah
End Sub

Sub CalledSub(Optional Called As Boolean = False)
 If Called = True Then GoTo Label_100
   < do code that only matters if this sub was NOT Called >
   < GoTo Label_200 >
Label_100
   < do code that only matters if this sub was Called >
Label_200
End Sub

**MarvinP** · 09-30-2010, 08:47 PM

How about using a global variable that keeps track?

**jaslake** · 09-30-2010, 08:50 PM

Assuming Label_100 is a procedure, my personal preference is

Call Label_100

**sauerj** · 09-30-2010, 09:15 PM

I edited the code shown on initial POST (above) so to better show how the Caller & Called SUBS interact.

That said, I like MarvinP's idea. That would be a fairly simple approach. Right before calling a SUB, add '1' to a Public Global variable. Then, when returning, subtract '1' from this variable. Then, if any SUB is running and this variable is > 0, then it has to have been called. Seems pretty solid to me. Thanks MarvinP.

I thought there might be some ERROR internal checker that tracks if a SUB was called (or some sort of internal VB thing). ... I'll keep this POST unsolved for another day or so in case someone else throws out another idea.