logo
VBA-методПособие

1.7 Назначение макросов командным кнопкам

 

Пользователь, который занимается разработкой приложений, должен быть заинтересован в автоматизации задач, и находить простые пути реализации намеченной цели. Самый доступный способ - использование командных кнопок непосредственно на листе рабочей книги Excel. Вставить командную кнопку можно с помощью панели инструментов Формы. Затем можно назначить ей любой макрос. После выполнения этих действий щелчок на командной кнопке будет вызывать на выполнение назначенный макрос.

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

1. Выполним команду Вид/ Панели инструментов/ Формы. Появится панель, как на рис. 5

Рис. 5 Панель инструментов Формы

 

2. Щёлкните на инструменте Кнопка панели инструментов Формы. Указатель мыши примет форму небольшого чёрного перекрестия

3. Поместите указатель мыши в то место, где хотите разместить командную кнопку, нажмите и не отпускайте левую кнопку мыши. Перетащите указатель мыши для создания прямоугольника. Придав командной кнопке нужный размер, отпустите кнопку мыши. После появления на рабочем листе командной кнопки одновременно откроется диалоговое окно Назначить макрос объекту.

Рис. 6 Окно Назначить макрос объекту

 

4. Выберите макрос МойПервыйМакрос и щёлкните на кнопке ОК. Этот макрос будет назначен созданной кнопке

5. Щёлкните и выделите надпись Кнопка1 на командной кнопке. Нажав клавишу Delete и удалив надпись, введите текст новой надписи, например РазмерШрифта

6. Установив указатель мыши на один из маркеров, которые окружают командную кнопку, Вы можете изменить размеры созданной кнопки

7. Щёлкните вне кнопки, чтобы снять с неё выделение

8. В ячейку А5 введите номер своей группы и нажмите Enter

9. Щёлкните на ячейке А5, а затем на созданной командной кнопке. Выполнится макрос МойПервыйМакрос