Custom button

[drimades]

I'm using this

Set cbc = Application.CommandBars("Standard").Controls.Add(Type:=msoControlButton, ID:=..., Temporary:=True)
cbc.OnAction = "YourMacroName"
Set cbc = Nothing

to add a button to the command bar. How can I add some text to that?

 

[stevexff]

You can set its Caption property. If not, then use the TooltipText property. But you might want to set its Picture, too.

Steve

[small]"Every program can be reduced by one instruction, and every program has at least one bug. Therefore, any program can be reduced to one instruction which doesn't work." (Object:erlDesignPatterns)[/small]