Использование кнопки на панели инструментов для запуска макроса

Поместим на стандартную панель инструментов кнопку Улыбающиеся лицо и назначим ей макрос Company Address Rel для этого:

· Выберите команду Настройка в контекстном меню панели инструментов. В окне диалога Настройка активизируйте вкладку Панели инструментов и нажмите кнопку Создать. В окне диалога введите Макросы и нажмите ОК. Excel создаёт пустую панель инструментов Макросы. Которую можно перетащить в любое место.

· При открытой панели инструментов Макросы перейдите на вкладку Команды окна диалога Настройка. Выберите категорию Автофигуры, чтобы вывести нужные нам значки кнопок. В списке Команды найдите кнопку Улыбающееся лицо и перетащите её на панель инструментов Макросы.

· Пместите указатель мыши на кнопку Улыбающееся лицо и нажмите правую кнопку. В контекстном меню выберите команду Назначить макрос, назначте кнопке макрос Company Address Rel и нажмите ОК. в конце диалога, закройте окно Настройка.

Другие команды контекстного меню Изменить выделенный объект позволяют выбрать новый значёк для кнопки, изменить существующий или в дополнение к значку отобразить на кнопке её название.

Для назначения макроса любому графическому объекту выведите вначале этот объект на экран, установите указатель на объекте и в контекстном меню выберите команду Назначить макрос. В одноимённом окне диалога выберите имя макроса и нажмите ОК.

Использование личной книги макросов.

Если необходимо, чтобы макрос был доступен всегда, сохраните его в личной книге макросов. Для вывода этой книги на экран выполните команду Окно/Отобразить и дважды щелкните на книге Personal.xls в окне диалога Вывод на экран скрытого окна книги. Если вы ещё ничего не сохраняли, файл Personal.xls в списке окна диалога не появится. Чтобы разрешить эту проблему, перед записью первого макроса выберите Личная книга макросов в раскрывающемся списке Сохранить в окне диалога Запись макроса. Далее в личную книгу макросов можно добавлять другие модули (макросы общего назначения), для этого:

· В меню Вид (View) редактораVBA выберите команду Оено проекта и откройте модуль, содержащий нужный макрос.

· Выделите макрос (весь текст в полном объёме) и переместите его в буфер обмена.

· С помощью окна проекта откройте Личную книгу макросов, Personal.xls и затем откройте в ней модуль. Установите курсор в нужном месте модуля и вставьте из буфера новый модуль.

· Переключитесь обратно в Excel и выберите в меню Окно команду Скрыть, чтобы скрыть личную книгу макросов.