Thank you, Bob. Works perfect! James

On Mar 31, 7:45�pm, "Bob Phillips" wrote:
Correction.

* * With Application.CommandBars("Worksheet Menu Bar")
* * * * With .Controls.Add(Type:=msoControlButton, temporary:=True)
* * * * * * .Caption = "some text"
* * * * * * .Style = msoButtonCaption
* * * * End With
* * End With

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Bob Phillips" wrote in message

...





* *with application.commandbars("Worksheet Menu Bar")
* * * *with .controls.add(name:="myButton",temporary:=True)
* * * * * *.caption = "some text
* * * *end with
* *end with

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my
addy)

"Zone" wrote in message
roups.com...
I want to add a control to Excel's standard menubar to show some
text. *The control will not do anything other than show its text.
TIA, James- Hide quoted text -

- Show quoted text -