R
rormeister
Using VBA I am trying to add a simple button to CommandBars(1). The
result of the code below is the button is created but the Caption is
missing. From the immediate window, the Caption Property contains the
value I assigned in the code, it just refuses to display on the
toolbar. This has worked for me hundreds of times in XL2k. Can you
help?
Sub AddUCXButton()
'
On Error Resume Next
DeleteUCXButton
Dim MenuObject
Set MenuObject = Application.CommandBars(1). _
Controls.Add(Before:=11, _
Type:=msoControlButton, Temporary:=True)
MenuObject.Caption = "&UCX830"
MenuObject.OnAction = "RunAMacro"
End Sub
TIA
Ror
result of the code below is the button is created but the Caption is
missing. From the immediate window, the Caption Property contains the
value I assigned in the code, it just refuses to display on the
toolbar. This has worked for me hundreds of times in XL2k. Can you
help?
Sub AddUCXButton()
'
On Error Resume Next
DeleteUCXButton
Dim MenuObject
Set MenuObject = Application.CommandBars(1). _
Controls.Add(Before:=11, _
Type:=msoControlButton, Temporary:=True)
MenuObject.Caption = "&UCX830"
MenuObject.OnAction = "RunAMacro"
End Sub
TIA
Ror