3. Способы запуска макросов

Лабораторная работа 3.1 Создание меню для запуска макроса

Создание меню для макросов VBA в Excel

Задание:

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

Решение:

1. Откройте Excel и в меню Сервис выберите Настройка. Откроется окно Настройка.

2. В этом окне на вкладке Команды нажмите на кнопку Упорядочить команды.

3. В открывшемся окне Изменение порядка команд переставьте переключатель в положение Панель инструментов и в списке рядом выберите "Строка меню листа". Нажмите на кнопку Добавить и в открывшемся окне в списке Категории слева выберите "Новое меню". В списке Команды справа выберите Новое меню и нажмите OK.

4. В окне Изменение порядка команд переставьте переключатель в положение Строка меню и в списке справа выберите Новое меню.

5. Нажмите на кнопку Добавить и в открывшемся окне в списке Категории слева выберите Макросы, а в списке Команды справа — "Настраиваемая команда меню" и нажмите OK. Затем в окне Изменение порядка команд нажмите на кнопку Закрыть.

6. При открытом окне настройка перетащите созданное вами меню "Новое меню" на нужное место (справа от пункта Справка) и щелкните по нему правой кнопкой мыши.

В контекстном меню измените для него в поле Имя значение на "Макросы".

7. Раскройте созданное вами меню и щелкните правой кнопкой мыши по строке Настраиваемая команда меню (при открытом окне Настройка). В поле Имя введите значение "Ответственный исполнитель". Затем в том же контекстном меню выберите пункт Назначить макрос и выберите созданный вами макрос PERSONAL.XLS!ОтвИсп. Нажмите OK, а затем Закрыть, чтобы закрыть окно Настройка.

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

Получить учебные материалы по этому курсу