Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Возвращает ссылку на коллекцию CommandBars , представляющую панели команд в приложении-контейнере. Только для чтения.
Примечание.
Начиная с Visio 2010 пользовательский интерфейс Microsoft Office Fluent заменил предыдущую систему многоуровневых меню, панелей инструментов и областей задач. Объекты и члены VBA, использовавшиеся для настройки пользовательского интерфейса в предыдущих версиях Visio, по-прежнему доступны в Visio, но функционируют иначе.
Синтаксис
выражение. Панели команд
выражение: переменная, представляющая объект Application.
Возвращаемое значение
CommandBars
Примечания
Начиная с Microsoft Visio 2002, приложение может управлять меню и панелями инструментов в пользовательском интерфейсе Visio, манипулируя коллекцией CommandBars , возвращаемой свойством CommandBars . Интерфейс коллекции "Панели команд" идентичен коллекции "Панели команд", предоставляемой набором приложений Microsoft Office, например Microsoft Word и Microsoft Excel.
Кроме того, начиная с Visio версии 4.0, Visio предоставляет свойства приложений и документов, которые возвращают объект UIObject , предоставляющий функциональные возможности, аналогичные командным панелям. Следовательно, программы могут использовать коллекцию 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.
Свойство "Контекст" определяет, в каком контексте меню появляется панель команд.
- Номер контекста меню — это строковое значение (например, 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 и обратная связь.