III. Работа с макросами

Макрос – это программа, представляющая собой последовательность макрокоманд и макрофункций. Макросы предназначены для автоматизации различных процедур работы с таблицей, в частности, автоматизации часто повторяющихся последовательностей рабочих шагов. В Excel макросы составляются на языке Visual Basic для приложений (Visual Basic for application) – едином для всех компонентов Office 97.

Наиболее простым средством создания макроса является его запись с помощью макрорекордера.

Для записи макроса с помощью макрорекордера необходимо выполнить следующие шаги:

- запустить макрорекордер командой СЕРВИС/Макрос;

- присвоить имя макросу;

- выполнить необходимые операции с таблицей, которые будут записаны макрорекордером в макропрограмму;

- после выполнения последней операции остановить запись макроса.

Задание 1.

Записать макрос, который будет заносить в ячейки А1: С4 последовательность натуральных чисел, начиная с 1, по часовой стрелке. Присвоить этому макросу имя «Макрос 1». Создать новое меню «Макросы» и в нем пункт с именем «Макрос 1». Создать новую панель инструментов и поместить на нее кнопку для запуска созданного макроса.

Технология

1. Установите на чистом рабочем листе курсор в ячейку Е10.

2. Для запуска макрорекордера выполните команду СЕРВИС/Макрос/Начать запись.

3. В диалоговом окне «Запись макроса» введите имя «Макрос 1» и щелкните по кнопке «Ok». На экране появится кнопка для остановки записи макроса. Учтите, что с этого момента все Ваши действия должны быть четкими, т.к. они записываются макрорекордером.

4. Последовательно введите в ячейку А1 число 1, в ячейку В1 число 2, в ячейку С1 число 3, в ячейку С2 число 4, в ячейку С3 число 5, в ячейку С4 число 6, в ячейку В4 число 7, в ячейку А4 число 8, в ячейку А3 число 9, в ячейку А2 число 10.

5. Остановите запись макроса, щелкнув по кнопке «Остановить запись».

6. Очистите рабочий лист, на котором производили запись и установите курсор в произвольную ячейку рабочего листа.

7. Запустите только что созданный макрос. Для этого выполните команду СЕРВИС/Макрос. Щелкните по имени макроса в окне «Макрос», а затем по кнопке «Выполнить». Действия, ранее выполненные Вами вручную, будут повторены макросом автоматически.

8. Создайте меню с именем «Макросы». Для этого:

- выполните команду СЕРВИС/Настройка и в окне «Настройка» на вкладке «Команды» выделите категорию «Новое меню»;

- перетащите мышью название этой категории на панель меню;

- щелкните правой кнопкой по перемещенному на панель названию и поменяйте имя меню на «Макросы»

9. Создайте пункт с именем «Макрос 1» в меню «Макросы». Для этого:

- выделите на вкладке «Команды» категорию «Макросы»;

- перетащите строку «Настраиваемая команда» из окна «Команды» на панель меню в область, расположенную под названием «Макросы».

- щелкните правой кнопкой по вновь созданному пункту «Настраиваемая команда меню» и поменяйте его имя на «Макрос1»;

- включите режим «только текст» и выполните пункт «Назначить макрос»;

- в окне «Назначить макрос» выделите в списке строку с именем макроса, который должен запускаться при щелчке по этому пункту и щелкните по кнопке «Ok»;

- закройте окно «Настройка».

10. Проверьте работу макроса 1 при его запуске через меню «Макросы». Проверьте работу макроса при запуске на другом рабочем листе.

11. Просмотреть текст макроса на языке Visual Basic, выполнив команду СЕРВИС/Макрос/ Макросы и щелкнув по кнопке «Войти». Вернуться в таблицу, выполнив команду редактора макросов ФАЙЛ/Закрыть и вернуться в Microsoft Excel.

12. Создать новую панель инструментов и поместить на нее кнопку для запуска Макроса 1. Для этого:

- выполнить команду СЕРВИС/Настройка и в окне «Настройка» на вкладке «Панели» включить, например, панель «Элементы управления»;

- в окне «Настройка» на вкладке «Команды» установить категорию «Макросы»;

- перетащить строку «Настраиваемая кнопка» на панель «Элементы управления»;

- не закрывая окна «Настройка», щелкнуть правой кнопкой мыши по кнопке «Настраиваемая кнопка» выполнить пункты меню «Выбрать значок для кнопки» и «Назначить макрос»;

- закрыть окно «Настройка» ипроверить действие кнопки для запуска макроса.