Displaying the Sub or Function Name
 

Is there anyway of displaying the current sub or function name that is
running?

Something like:

Sub DisplaySubName()
MsgBox ThisSub.Name
End Sub

Displaying the Sub or Function Name
 

hi
you can use the status bar.
when writing the sub, you know the name of the sub your are writing.
at the beginning of the sub add this like
application.statusbar = "sub now running = mysub"
at the end of the sub ad this line
application.statusbar = False

the name of the sub will appear in the lower left on the status bar.

Regards
FSt1

"FunkySquid" wrote:

Is there anyway of displaying the current sub or function name that is
running?

Something like:

Sub DisplaySubName()
MsgBox ThisSub.Name
End Sub

Displaying the Sub or Function Name
 

that's cool. is there any way to have the macro pull out the name
automatically without hard coding it?
just wondering.
:)
susan


On May 29, 2:15*pm, FSt1 wrote:
hi
you can use the status bar.
when writing the sub, you know the name of the sub your are writing.
at the beginning of the sub add this like
application.statusbar = "sub now running = mysub"
at the end of the sub ad this line
application.statusbar = False

the name of the sub will appear in the lower left on the status bar.

Regards
FSt1



"FunkySquid" wrote:
Is there anyway of displaying the current sub or function name that is
running?

Something like:

Sub DisplaySubName()
* MsgBox ThisSub.Name
End Sub- Hide quoted text -

- Show quoted text -

Displaying the Sub or Function Name
 

hi
I don't think you can while the code is running because you have to run code
to to find the sub name and since you can't run 2 sub at the same time you
would have to incorperated the "find" code into the running sub. and if
using a message box, that would stop code from running while the message box
was up since the message box is modal. best just to use the status bar

Regards
FSt1

"Susan" wrote:

that's cool. is there any way to have the macro pull out the name
automatically without hard coding it?
just wondering.
:)
susan


On May 29, 2:15 pm, FSt1 wrote:
hi
you can use the status bar.
when writing the sub, you know the name of the sub your are writing.
at the beginning of the sub add this like
application.statusbar = "sub now running = mysub"
at the end of the sub ad this line
application.statusbar = False

the name of the sub will appear in the lower left on the status bar.

Regards
FSt1



"FunkySquid" wrote:
Is there anyway of displaying the current sub or function name that is
running?

Something like:

Sub DisplaySubName()
MsgBox ThisSub.Name
End Sub- Hide quoted text -

- Show quoted text -

Displaying the Sub or Function Name
 

yes, i see.
i tend to have one "overview" sub (like a userform sub) that calls all
my sub-subs (for lack of a better term) & i could put it in there
before calling each of them (& afterwards). such as:

sub commandbutton1_click()
application.statusbar = "sub now running = find_terms"
Call find_terms
application.statusbar = false
application.statusbar = "sub now running = insert_data"
Call insert_data
application.statusbar = false
end sub

thanks for the info.
:)
susan


On May 29, 2:55*pm, FSt1 wrote:
hi
I don't think you can while the code is running because you have to run code
to to find the sub name and since you can't run 2 sub at the same time you
would have to incorperated the "find" code into the running sub. *and if
using a message box, that would stop code from running while the message box
was up since the message box is modal. best just to use the status bar

Regards
FSt1



"Susan" wrote:
that's cool. *is there any way to have the macro pull out the name
automatically without hard coding it?
just wondering.
:)
susan

On May 29, 2:15 pm, FSt1 wrote:
hi
you can use the status bar.
when writing the sub, you know the name of the sub your are writing.
at the beginning of the sub add this like
application.statusbar = "sub now running = mysub"
at the end of the sub ad this line
application.statusbar = False

the name of the sub will appear in the lower left on the status bar.

Regards
FSt1

"FunkySquid" wrote:
Is there anyway of displaying the current sub or function name that is
running?

Something like:

Sub DisplaySubName()
* MsgBox ThisSub.Name
End Sub- Hide quoted text -

- Show quoted text -- Hide quoted text -

- Show quoted text -

Displaying the Sub or Function Name
 

looks like you got ahold of that handle pretty good. that should work nicely
for you.

Regards
FSt1

"Susan" wrote:

yes, i see.
i tend to have one "overview" sub (like a userform sub) that calls all
my sub-subs (for lack of a better term) & i could put it in there
before calling each of them (& afterwards). such as:

sub commandbutton1_click()
application.statusbar = "sub now running = find_terms"
Call find_terms
application.statusbar = false
application.statusbar = "sub now running = insert_data"
Call insert_data
application.statusbar = false
end sub

thanks for the info.
:)
susan


On May 29, 2:55 pm, FSt1 wrote:
hi
I don't think you can while the code is running because you have to run code
to to find the sub name and since you can't run 2 sub at the same time you
would have to incorperated the "find" code into the running sub. and if
using a message box, that would stop code from running while the message box
was up since the message box is modal. best just to use the status bar

Regards
FSt1



"Susan" wrote:
that's cool. is there any way to have the macro pull out the name
automatically without hard coding it?
just wondering.
:)
susan

On May 29, 2:15 pm, FSt1 wrote:
hi
you can use the status bar.
when writing the sub, you know the name of the sub your are writing.
at the beginning of the sub add this like
application.statusbar = "sub now running = mysub"
at the end of the sub ad this line
application.statusbar = False

the name of the sub will appear in the lower left on the status bar.

Regards
FSt1

"FunkySquid" wrote:
Is there anyway of displaying the current sub or function name that is
running?

Something like:

Sub DisplaySubName()
MsgBox ThisSub.Name
End Sub- Hide quoted text -

- Show quoted text -- Hide quoted text -

- Show quoted text -