I'd like to add an argument to an Onaction sub, which is
associated with a button? Can I?

Sub DoThis(strArg as String)
....
End Sub

Dim b as CommandBarButton
b.OnAction ="DoThis" *** THEN WHAT ***


Thanks

Hi Jason,

Yes, you can do this. You can add the string to the Parameter property of
the CommandBarButton. Then, in your subroutine specified by the OnAction
property, you can check the Parameter property of the "clicked" button with
Application.CommandBars.ActionControl.Parameter.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address unmonitored]


Jason wrote:
I'd like to add an argument to an Onaction sub, which is
associated with a button? Can I?

Sub DoThis(strArg as String)
....
End Sub

Dim b as CommandBarButton
b.OnAction ="DoThis" *** THEN WHAT ***


Thanks

.OnAction = "'DoThis ""TestString""'"

"Jason" wrote in message
...
I'd like to add an argument to an Onaction sub, which is
associated with a button? Can I?

Sub DoThis(strArg as String)
....
End Sub

Dim b as CommandBarButton
b.OnAction ="DoThis" *** THEN WHAT ***


Thanks

Note that this undocumented feature appears to not be supported in xl2002.
I believe it may have problems in the latest service release of xl2000 as
well. At least that is what I recall has been reported here.

--
Regards,
Tom Ogilvy

"Tim Zych" wrote in message
...
.OnAction = "'DoThis ""TestString""'"

"Jason" wrote in message
...
I'd like to add an argument to an Onaction sub, which is
associated with a button? Can I?

Sub DoThis(strArg as String)
....
End Sub

Dim b as CommandBarButton
b.OnAction ="DoThis" *** THEN WHAT ***


Thanks

Didn't know that. Thanks for the update.

-----Original Message-----
Note that this undocumented feature appears to not be
supported in xl2002.
I believe it may have problems in the latest service
release of xl2000 as
well. At least that is what I recall has been reported
here.

--
Regards,
Tom Ogilvy

"Tim Zych" wrote in message
...
.OnAction = "'DoThis ""TestString""'"

"Jason" wrote in
message
...
I'd like to add an argument to an Onaction sub, which
is
associated with a button? Can I?

Sub DoThis(strArg as String)
....
End Sub

Dim b as CommandBarButton
b.OnAction ="DoThis" *** THEN WHAT ***


Thanks






.

I had the same problem: works in older Excel version

-----Original Message-----
Didn't know that. Thanks for the update.

-----Original Message-----
Note that this undocumented feature appears to not be
supported in xl2002.
I believe it may have problems in the latest service
release of xl2000 as
well. At least that is what I recall has been reported
here.

--
Regards,
Tom Ogilvy

"Tim Zych" wrote in message
...
.OnAction = "'DoThis ""TestString""'"

"Jason" wrote in
message
...
I'd like to add an argument to an Onaction sub,
which
is
associated with a button? Can I?

Sub DoThis(strArg as String)
....
End Sub

Dim b as CommandBarButton
b.OnAction ="DoThis" *** THEN WHAT ***


Thanks






.

.