- Код: Выделить всё
Dim CommBar as CommandBar
set CommBar = Application.CommandBars.Add(Name:=CommandBarName, Position:mspBarTop, MenuBar:=false, Temporary:= true)
В коллекцию новый комманд бар добавляется прекрасно, но при этом нигде больше не отображается - что по идее логично, ведь в новом офисе меню иерархическое (со вкладками). В msdn пока не лазил, каюсь, скиньте плз идею.
