Вопрос 8. Работа с макросами в табличном процессоре ms Excel

За каждой кнопкой панелей инструментов закреплена небольшая программа – макрос. Макрос представляет собой последовательность макрокоманд и макрофункций. Excel предоставляет пользователю возможность создавать собственные макросы с использованием языка VBA или макрорекордера.

Наиболее простым способом создания макрокоманды является ее запись с помощью макрорекордера. Это средство позволяет автоматизировать выполнение часто повторяющихся последовательностей рабочих шагов и при этом не требует знаний макропрограммирования. Макрорекордер протоколирует все выполняемые пользователем действия и сам преобразует их в VBA-код.

Рассмотрим порядок создания и запуска макроса, который должен для любого выделенного блока ячеек выполнять следующую последовательность действий:

        устанавливать для шрифта размер– 16 пт, цвет– синий;

     задавать внешние границы для блока толстой синей линией;

    присваивать ячейкам денежный формат с отображением двух знаков после запятой.

1.      А ктивизируйте новый пустой рабочий лист.

2.      Выполните команду Сервис► Макрос► Начать запись.

3.      В открывшемся диалоговом окне Запись макроса (рис. 5.26) введите имя макроса – Пробный.

 Примечание. Имя макроса должно не содержать пробелы и не превышать 255 символов. По желанию можно внести описание макроса, задать комбинацию «горячих» клавиш для быстрого вызова макроса в поле Сочетание клавиш и в поле Сохранить в указать, где будет сохранен созданный макрос.

4.      Д ля запуска процедуры записи щелкните на кнопке [ОК]. На экран будет выведена панель инструментов Остановить запись, представленная на рис. 5.27. Панель содержит две кнопки: [Остановить запись] и [Относительная ссылка].

Примечание. Если панель Остановить запись не появилась, то ее можно отобразить командой Вид►Панели инструментов►Остановить запись.

5.      Выполните щелчок на кнопке [Относительная ссылка] для того, чтобы макрос в дальнейшем выполнялся для любого выделенного блока ячеек, а не той ячейки, которая была активна при записи макроса.

6.      Выполните последовательность действий, назначаемых макросу:

        установите Формат►Ячейки►вкладка Шрифт;

        измените цвет шрифта на синий, размер шрифта – 16 пт;

        перейдите на вкладку Граница, выберите заданный тип и синий цвет линии, щелкните на кнопке [Внешние];

        перейдите на вкладку Число, в списке Числовые форматы выберите Денежный, число десятичных знаков – 2.Нажмите [ОК]

7.      Завершите запись щелчком по кнопке [Остановить запись] или выполнив команду меню Сервис►Макрос►Остановить запись.

8.      Проверьте работу макроса. Для этого:

        активизируйте новый лист и выделите, например, ячейки В2:D8;

        введите в ячейки В2, С6 произвольные данные;

        выполните команду Сервис►Макрос►Макросы. В открывшемся диалоговом окне Макрос выберите макрос Пробный и нажмите [Выполнить].

Для более быстрого запуска макрос также можно назначить пиктограмме на панели инструментов или пункту в главном меню.

Рассмотрим алгоритм назначения макроса кнопке на панели инструментов на примере инсталляции макроса Пробный в виде пиктограммы красного цвета на панель инструментов Форматирование и запуска макроса при помощи пиктограммы.

1.      Откройте окно Настройка командой Вид►Панели инструментов► Настройка►вкладка Команды.

2.      В списке Категории выберите – Макросы, а в списке Команды выделите пункт Настраиваемая кнопка и перетащите его при помощи левой кнопки мыши на панель инструментов, разместив, например, после кнопки К [курсив]. На панели инструментов появится новая кнопка (обычно это кнопка с изображением улыбающегося смайлика).

3.      Назначьте кнопке макрос, для чего в окне Настройка нажмите кнопку [Изменить выделенный объект] (новая кнопка на панели инструментов должна быть выделена) и в открывшемся меню выберите пункт Назначить макрос. В окне Назначить макрос выделите макрос с именем Пробный и нажмите [ОК].

4.      Представьте кнопку без текста. Снова активизируйте кнопку [Изменить выделенный объект] и выберите пункт – Основной стиль.

5.      Измените значок на кнопке. Для этого нажмите кнопку [Изменить выделенный объект] и выберите пункт Изменить значок на кнопке. В окне Редактор кнопок в группе Цвета выберите нужный цвет, а в поле Рисунок разукрасьте кнопку при помощи щелчков мыши на каждом квадратике. Нажмите [ОК]. Закройте окно Настройка.

6.      Проверьте работу новой кнопки на ячейках H2:I6, введя в них произвольные данные.

Для удаления макроса используется кнопка [Удалить] в окне Макросы. Кнопку с панели инструментов можно удалить, отбуксировав ее в любое место окна Настройка.