Удаление панели инструментов

Если вы не хотите, чтобы созданная панель инструментов стала частью среды Excel, ее надо удалить до или при закрытии рабочей книги. Для этого используется метод Delete (Удалить).

1. Создайте новую процедуру и назовите ее УдалениеПанели.

2. Введите код этой процедуры.

ThisWorkbook.Activate CommandBars("Моя панель").Delete

3. Выполните процедуру. Панель инструментов Моя панель будет удалена.

Резюме

Панели инструментов - один из самых полезных элементов интерфейса и Excel, и создаваемого вами приложения. Для создания собственных панелей инструментов можно использовать как встроенные средства Excel, так и программный код. Оба подхода рассмотрены в текущем часе.

Следующий час будет посвящен другому важному элементу интерфейса Excel - системе меню. Мы изучим технику манипулирования встроенным меню Excel и создания собственного меню посредством VBA.

Вопросы и ответы

Вопрос. Почему в списке объектов VBA нет объекта Toolbar (Панель инструментов)?

Ответ. В VBA панели инструментов являются объектами CommandBar. Другие представители этого класса объектов - строки меню.

Вопрос. Почему я должен использовать в качестве значков на кнопках только то, что мне предлагает Microsoft? Можно ли создать собственное изображение для кнопки?

Ответ. Да, это можно сделать с помощью редактора кнопок Excel. При открытом диалоговом окне Настройка щелкните правой кнопкой мыши на кнопке, которую хотите изменить, и в контекстном меню выберите команду Изменить значок на кнопке. Откроется диалоговое окно Редактор кнопок, в котором можно изменить существующее или создать собственное изображение, выводимое на кнопке.

Практикум

С помощью тестов и упражнений вы проверите, насколько хорошо усвоили изложенный материал. Ответы на вопросы смотрите в Приложении.

Тесты

1. Какой коллекции принадлежат панели инструментов как элементы?

2. Какое свойство используется для назначения кнопке панели инструментов макроса или процедуры?

3. Какой коллекции принадлежат кнопки панелей инструментов как элементы?

4. Какой метод применяется для удаления панелей инструментов?

5. Как вывести на экран панель инструментов с помощью кода VBA?

6. Какое свойство применяется для задания значка, выводимого на кнопке?

7. Истинно или ложно следующее утверждение: после создания панель инструментов автоматически выводится на экран?

Упражнение

Создайте процедуру с именем Панель_Час16. Эта процедура должна создать и вывести на экран панель инструментов 16-й час с тремя кнопками: Создать (ID равен 2530), Открыть (ID равен 23) и Сохранить (ID равен 3).

Создайте также процедуру ЗакройПанель, которая будет удалять панель 16-й час. Выполните и протестируйте эти процедуры.

17-й час. Работа с меню

В предыдущем часе вы изучили методы работы с панелями инструментов. В этом часе вы узнаете, как работать с системой меню "вручную" и с помощью программ. В этом часе будут рассмотрены следующие вопросы.

• Способы модификации системы меню.

• Создание меню посредством кода VBA.

• Отображение и удаление строк меню.