Свойства коллекции CommandBars
Коллекция CommandBars
ТЕМА 2.8 РАЗРАБОТКА ПРИЛОЖЕНИЙ ДЛЯ MS OFFICE
Для разработчика на VBA имеется возможность изменять внешний вид офисных приложений. Это реализуется через свойства и методы таких встроенных объектов как, наприемр, CommandBar
Элементами коллекции CommandBars являются объекты CommandBar, которые представляют собой панель команд. Таким образом, коллекция CommandBars содержит все панели команд приложения.
Например, чтобы создать новую панель команд, можно выполнить следующую процедуру:
Set myBar = CommandBars.Add(Name:="Личная",Position:=msoBarFloating) myBar.visible = True| Свойство | Описание |
| Application | Позволяет сослаться на активный объект Application и его свойство. Каждый объект и коллекция в MS Office имеют данное свойство |
| ActionControl | Возвращает объект CommandBarControl, значение свойства OnAction которого определяет запускаемую процедуру. Если процедура не была инициирована элементом управления панели команд, то это свойство возвращает значение Nothing (пусто). Данное свойство можно использовать, например, для проверки того, какая из кнопок на панели инструментов была нажата |
| ActiveMenuBar | Возвращает объект CommandBar, который представляет собой активную строку меню приложения |
| Count | Возвращает количество элементов коллекции (строк меню, панелей инструментов и контекстных меню) |
| DisplayFonts | Определяет способ отображения шрифта в списке Шрифт (Font). Если установлено значение True, то элементы списка отображаются тем шрифтом, который они и представляют |
| DisplayToolTips | Определяет, отображаются ли экранные подсказки элементов управления панели команд: Да (True) или Нет (False). Обратите внимание, что в случае установки данного свойства в одном из приложений MS Office оно будет оказывать немедленное воздействие на все открытые приложения MS Office, а также на все приложения MS Office, запущенные после этого |
| Item | Возвращает объект CommandBar, являющийся элементом коллекции CommandBars, или объект CommandBarControl из коллекции CommandBarControls. Синтаксис: Expression.Item(Index) где Expression – обязательный элемент, представляющий выражение, которое возвращает объект CommandBar или объект CommandBarControl; Index – обязательный элемент типа Variant, который определяет имя или порядковый номер возвращаемого объекта в коллекции CommandBars |
| LargeButtons | Определяет размер отображаемых кнопок панели инструментов: большего размера, чем нормальный Да (True) или Нет (False) |
| MenuAnimationStyle | Определяет тип анимации панели команд. Значение данного свойства должно равняться значению одной из констант, указанных после таблицы |