- Код: Выделить всё
With CommandBars("Menu Bar")
Set b = .Controls.Add(Type:=msoControlButton, Before:=11)
b.Caption = "Исходящие"
End With
А дальше то, что можно ручками в свойствах кнопки поменять вот так "Настройка --> правый клик --> Только текст (всегда)" тогда на кнопке будет показываться ее название. Так вот никак не могу понять как это можно через ВБА это сделать, вроде уже все перепробовал.