Свойство Application.CommandBars (Visio)
Возвращает ссылку на коллекцию CommandBars , представляющую панели команд в приложении контейнера. Только для чтения.
Примечание.
Начиная с Visio 2010 пользовательский интерфейс Microsoft Office Fluent заменил предыдущую систему многоуровневых меню, панелей инструментов и областей задач. Объекты И элементы VBA, которые использовались для настройки пользовательского интерфейса в предыдущих версиях Visio, по-прежнему доступны в Visio, но работают по-разному.
Синтаксис
expression. CommandBars
выражение: переменная, представляющая объект Application.
Возвращаемое значение
CommandBars
Замечания
Начиная с Microsoft Visio 2002, программа может управлять меню и панелями инструментов в пользовательском интерфейсе Visio, управляя коллекцией CommandBars , возвращенной свойством CommandBars . Коллекция CommandBars имеет интерфейс, идентичный коллекции CommandBars, предоставляемой набором приложений Microsoft Office, таких как Microsoft Word и Microsoft Excel.
Кроме того, начиная с Visio версии 4.0, Visio предоставляет свойства приложения и документа, которые возвращают объект UIObject , который предоставляет функции, аналогичные CommandBars. Следовательно, программы могут использовать коллекцию CommandBars или объекты UIObject для управления меню и панели инструментов Visio.
Чтобы получить сведения об объекте, возвращаемом свойством CommandBars , выполните следующие действия:
На вкладке Разработчик выберите Visual Basic.
В меню Вид выберите Обозреватель объектов.
В списке Проект или библиотека выберите Office.
Если вы не видите библиотеку типов Office в списке Проект или библиотека, в меню Сервис выберите Ссылки, выберите проверка библиотеки объектов Microsoft Office 14.0 и нажмите кнопку ОК.
В разделе Классы изучите класс с именем CommandBars.
Каждый объект CommandBarControl в коллекции CommandBars имеет свойство OnAction , а каждый объект CommandBar в коллекции CommandBars имеет свойство Context . Значения этих свойств определяются приложением-контейнером. В Microsoft Visio:
Свойство OnAction — это строковое значение, которое интерпретируется либо как надстройка COM, либо как макрос Microsoft Visual Basic для приложений (VBA), либо как код VBA, либо как имя надстройки Visio.
Свойство Context определяет, в каком контексте меню отображается панель команд.
- Номер контекста меню — это строковое значение (например , visUIObjSetDrawing или "2"), за которым следует звездочка, если панель команд отображается по умолчанию (например, visUIObjSetShapeSheet
& "*" or "4*"). - Допустимые контексты меню: visUIObjSetDrawing (2), visUIObjSetStencil (3), visUIObjSetShapeSheet (4), visUIObjSetIcon (5) или visUIObjSetPrintPreview (7). Попытка задать для свойства Context любое другое значение завершится ошибкой.
- Номер контекста меню — это строковое значение (например , visUIObjSetDrawing или "2"), за которым следует звездочка, если панель команд отображается по умолчанию (например, visUIObjSetShapeSheet
Пример
В этом макросе показано, как использовать свойство CommandBars для вывода списка панелей команд.
Public Sub CommandBars_Example()
Dim vsoCommandBars As CommandBars
Dim vsoCommandBar As CommandBar
'Get the set of CommandBars
'for the application.
Set vsoCommandBars = Application.CommandBars
'List each CommandBar in the Immediate window.
For Each vsoCommandBar In vsoCommandBars
Debug.Print vsoCommandBar.Name
Next
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.