Свойства и методы коллекции CommandBars

Коллекция CommandBars обладает не только традиционными свойствами и методами, но и некоторыми специфическими свойствами. Давайте кратко познакомимся с большинством из них:

• Property ActionControl As CommandBarControl вызывается обычно в одной из OnAction процедур и возвращает объект CommandBarControl, чье свойство Action связано с этой выполняемой процедурой. Если же такого объекта нет, то возвращается Nothing, что бывает при вызове этого свойства из обычной процедуры. Позволяет отключить доступ к объекту на время выполнения процедуры.

• Property ActiveMenuBar As CommandBar возвращает объект CommandBar, представляющий активную панель меню.

• Property DisplayKeysInTooltips As Boolean, DisplayTooltips As Boolean - если свойства имеют значения True, то на панели отображаются назначения "горячих" клавиш.

• Property LargeButtons As Boolean - значение True позволяет включить клавиши "большого" размера.

• Function Add([Name], [Position], [MenuBar], [Temporary]) As CommandBar. Метод Add позволяет программным путем добавить в коллекцию новую панель, дав ей имя Name. Параметр Position указывает расположение панели на экране. Его возможные значения: msoBarLeft, msoBarTop, msoBarRight, msoBarBottom указывают куда стыковочная панель будет причалена- вверху, справа, слева или снизу экрана. Значение msoBarFloating этого параметра указывает, что панель не является стыковочной и находится в плавающем состоянии. Значение msoBarPopup указывает, что новая панель создается для контекстного меню. Булев параметр MenuBar имеет значение True, когда новая панель заменяет существующую панель меню. Параметр Temporary позволяет это назначение сделать временным.

• Function FindControl([Type], [Id], [Tag], [Visible]) As CommandBarControl - Позволяет найти на панелях, входящих в коллекцию, элемент, удовлетворяющий критериям поиска. Параметры, являющиеся ключами поиска, могут быть опущены, достаточно задания одного из них.

• Sub ReleaseFocus() - Все панели теряют фокус.

В Office 2000 у этой коллекции появились новое свойство и новое событие:

• Property AdaptiveMenus As Boolean. Позволяет включить или выключить адаптивные меню, - собственные меню, заменяющие стандартные.

• Event OnUpdate() - Событие возникает при любых изменениях командной панели - объекта CommandBar.

Свойства и методы объекта CommandBar

Вот основные свойства и методы самого объекта CommandBar, представляющего отдельную панель:

• Property BuiltIn As Boolean Это булево свойство определено как для панели, так и для ее элементов, значение True указывает, что панель или элемент являются встроенными, False - определены пользователем.

• Property Context As String - позволяет установить или проверить контекст, определяющий местоположение хранения панели, то ли непосредственно с самим документом, то ли в другом возможном месте, зависящем от приложения. Это важная информация для корректной работы.

• Property Controls As CommandBarControls - можно сказать центральное свойство, возвращающее, как мы уже говорили, коллекцию элементов, располагаемых на панели.

• Property Enabled As Boolean, Visible As Boolean - тоже два центральных и широко используемых свойства. Первое позволяет выключить доступ к панели, обычно временно, второе делает панель вообще невидимой и тем более недоступной.

• Property Height As Long, Left As Long, Top As Long, Width As Long - типичные свойства графических элементов, в том числе для панели и ее элементов. Задают размеры элемента.

• Property Index As Long - возвращает порядковый номер элемента в коллекции.

• Property Name As String, NameLocal As String - имя панели или ее элемента, для встроенных панелей (элементов) имеют смысл два имени "родное" английское имя и локализованное.

• Property Position As MsoBarPosition - такое же свойство, как у коллекции панелей, но применяемое к отдельно взятой панели.

• Property Protection As MsoBarProtection - защищает панель от тех или иных действий пользователя. Значением свойства являются константы, определяющие, что конкретно нельзя делать с панелью, например, менять ее размеры или передвигать.

• Property Type As MsoBarType - возвращает тип панели.

• Sub Delete() - удаляет панель

• Function FindControl([Type], [Id], [Tag], [Visible], [Recursive]) As CommandBarControl - такой же метод поиска элемента, как и описанный выше для коллекции, но поиск ограничен пределами одной панели.

• Sub Reset() - Восстанавливает установки, принятые по умолчанию, в частности конфигурацию встроенных панелей.

• Sub ShowPopup([x], [y]) - отображает контекстную панель в позиции, заданной курсором или параметрами X и Y, если они указаны.

• Также как и коллекция, этот объект приобрел новое булево свойство AdaptiveMenu