Determine Calling Procedure Name in VBA

[mond007]

Hi,

I have a generic_error_hadler which I call on error and I setup quite a fancy msgbox with lots of details but one of the detail that I have to pass is the calling procedure name at run time i.e.

Sub Validation_Routine()
On Error GoTo Error_Handler
   valid = False
   If Range("first_name").Value = "" Then
        MsgBox "Please enter your name"
        Exit Sub
    End If
valid = True
Exit Sub
Error_Handler:
    Application.ScreenUpdating = True
    Call Generic_Handler(Err.Number, Err.Description, "Validation_Routine")
End Sub

I would like to call this Generic_Handler without having to setup or type the "Validation_Routine"

How can I get the calling procedure name ?

I have tried things like application.caller or
Application.VBE.... etc ut tono avail.

Thanks in Advance.

 

[BrianB]

I often use a global variable that is set by each subroutine. Useful for debugging. eg:

Dim CurrentRoutine as String
 
Sub Validation_Routine()
    CurrentRoutine = "Validation"
' ...... etc.

 

[Makrini]

Wow - what a great idea Brian!

I assume you can then use "Watch" and see exactly what procedures have run in which order...

very nice

 

[mond007]

Hi Guys,

I can appreciate the above but that does mean going into all subroutines and setting up

CurrentRoutine = "Validation" etc etc...

which is expensive on development time when you have several dozens of routines.

I wanted to do this automatically via some object that I can grab the routine name information from.

Thanks in advance.

 

[BrianB]

In the absence of other replies ..............................

 

[Norie]

mond007

I'm sorry but as far as I know there is no way to do this easily.

This is a question often asked here, and I'm sure you could find some answers/workarounds if you tried a board search.

Mind you I would wonder why you want this.

There are plenty of debugging tools in the VBE.

PS It might be an idea to post the code you are having problems with.

 

[RoryA]

There is no such object, as there is no programmable access to the call stack. You have to provide the name yourself, I'm afraid.