Вопросы и ответы
Вопрос. При работе с панелями инструментов я использовал коллекции CommandBars и Controls. Эти же коллекции применяются и при работе со строками меню. Почему?
Ответ. В Excel (или шире - в Microsoft Office) строки меню и панели инструментов - это два элемента одной коллекции CommandBars (Командные панели). В свою очередь пункты меню, элементы меню (команды) и кнопки панелей инструментов также являются членами одной коллекции Controls (Элементы управления). Если подумать, то в таком объединении разнородных, на первый взгляд, элементов есть определенный смысл: и строка меню, и панель инструментов - это всего лишь контейнеры-панели, содержащие разнообразные элементы управления.
Вопрос. Как можно заблокировать какой-либо пункт меню или команду при выполнении своего приложения?
Ответ. Очень просто! Положите для пункта меню или команды, которые хотите заблокировать, значение свойства Enabled равным False. И все!
Практикум
С помощью тестов и упражнений вы проверите, насколько хорошо усвоили изложенный материал. Ответы на вопросы смотрите в Приложении.
Тесты
-
Какой метод используется для создания меню?
-
Какое свойство пользовательской команды (элемента меню) назначает процедуру, выполняемую при выборе этой команды?
-
Какой тип элемента управления задает пункт меню?
-
Как удалить строку меню с помощью кода VBA?
-
Какое диалоговое окно должно быть открыто при настройке меню?
-
Для создания командной панели вы используете метод Add. Какой аргумент этого метода (и как) надо задать, чтобы командная панель автоматически удалялась при закрытии приложения, содержащего эту панель?
-
Как вывести на экран строку меню?
Упражнение
Напишите процедуру, которая создавала бы и выводила на экран строку меню (с именем Пример17), содержащую пункты Файл, Правка и Справка. Напишите еще одну процедуру для удаления этой строки меню. На свободном рабочем листе создайте две командные кнопки, которые выполняли бы эти процедуры. Выполните и протестируйте процедуры.
18-й час. Диаграммы
Построение диаграмм - одно из самых популярных средств Excel. Разработчики часто используют это средство Excel построения диаграмм в своих приложениях. В этом часе мы запишем макрос, создающий диаграмму, а затем исследуем и изменим код этого макроса в редакторе Visual Basic.
В этом часе будут рассмотрены следующие вопросы.
-
Запись процесса создания диаграммы.
-
Исследование кода макроса.
-
Изменение кода макроса.
-
Усовершенствование процедуры построения диаграмм.
Создание диаграмм
Любой пользователь Excel знаком с процессом построения диаграмм. А если он знает, как построить диаграмму, то может и автоматизировать процесс построения диаграмм. "Как?", - спросите вы. Очень просто: запишите макрос, выполняющий весь процесс создания диаграммы, а затем усовершенствуйте код этого макроса.
Запись макроса построения диаграмм
Последуем своему же совету и запишем макрос, выполняющий построение диаграммы. Но сначала надо создать таблицу данных, на основе которых будет построена диаграмма, и заранее решить, диаграмму какого типа мы будем строить, и продумать способы ее форматирования.
Для чистоты эксперимента закройте все открытые рабочие книги и откройте новую рабочую книгу. В новой книге создайте таблицу данных, показанную на рис. 18.1. По этим данным построим круговую диаграмму.
Выделите диапазон А1:В6 и выполните команду Сервис > Макрос > Начать запись. В диалоговом окне Запись макроса введите имя макроса КруговаяДиаграмма, а в списке Сохранить в выберите пункт Эта книга. Теперь все готово к началу записи макроса. Щелкните на кнопке ОК.
Рис. 18.1. Таблица данных, на основе которой будет построена круговая диаграмма
Рис. 18.2 Диаграмма, созданная с помощью мастера диаграмм
Запустите мастера диаграмм и в первом диалоговом окне мастера выберите круговую диаграмму. Пропустите второе окно мастера, щелкнув на кнопке Далее. В третьем диалоговом окне мастера перейдите на вкладку Подписи данных и установите переключатель Доля. Щелкните на кнопке Далее. В последнем окне мастера укажите, что диаграмму следует поместить на существующем рабочем листе Лист1. Закройте диалоговое окно мастера, щелкнув на кнопке Готово.
На этом построение диаграммы не заканчивается. Теперь отформатируем заголовок диаграммы. Дважды щелкните на заголовке - откроется диалоговое окно Формат названия диаграммы. Прейдите на вкладку Шрифт, задайте полужирное курсивное начертание шрифта и установите размер шрифта 14 пунктов. Закройте диалоговое окно Формат названия диаграммы и остановите запись макроса. Построенная диаграмма показана на рис. 18.2.
Теперь исследуем код записанного макроса и посмотрим, как можно его усовершенствовать.