Приложение 2 (Программирование через редактирование макроса) Введение
Макрос, как уже говорилось это записанные действия пользователя внутри приложения, которые могут быть выполнены автоматически.
Внутри Excel можно написать процедуру на VBA, не пользуясь VBA редактором. Такая процедура является Макросом. Код Макроса возможно отредактировать, и сделать из него процедуру, например, процедуру со входными параметрами. Написание макроса в ряде случаев гораздо быстрей и проще, чем написания фрагмента программы обычным способом. Кроме того, программист может не знать некоторых операторов, выполняющих определенные действия в Excel, но в макрос эти операторы будут записаны автоматически.
Запись макроса в книгу Excel
Рис.14 Окно начала записи макроса
Перед записью макроса необходимо выполнить следующие действия:
Вызвать окно начала записи макроса, для этого необходимо войти в следующие пункты меню: Сервис-Макрос-Начать Запись.
В окне “запись макроса” (рис 14) нужно указать имя макроса, по правилам идентификатора (см. Другие понятия языка VBA), можно также назначить горячую клавишу для запуска макроса, а так же выбрать книгу, в которой будет записан макрос, а затем нажать клавишу OK.
Необходимо выполнить те действия, внутри Excel, которые вы хотите что б они выполнялись при запуске макроса.
Нужно завершить запись макроса, меню: Сервис-Макрос-Завершить запись.
После выполнения вышеуказанных действий макрос запишется в указанную вами книгу.
Запуск макроса из меню.
Рис 15 Окно запуска макросов
Запустить макрос можно следующим образом:
Вызвать окно начала запуска макроса, для этого необходимо войти в следующие пункты меню: Сервис-Макрос-Макросы.
Выбрать ту книгу, из которой необходимо запустить макрос.
Выбрать левой клавишей мыши имя макроса из списка для запуска.
Нажать кнопку Выполнить.
Примечание: Т.к. макрос в Excel является процедурой, то из программы VBA его можно вызывать по правилу вызова процедуры.
Быстрый переход в код макроса
Макрос можно найти в соответствующем модуле проекта через VBA редактор, но существует быстрый переход к коду макроса:
Вызвать окно начала запуска макроса, для этого необходимо войти в следующие пункты меню: Сервис-Макрос-Макросы(см рис 15).
Выбрать ту книгу, в которой находится макрос.
Выбрать левой клавишей мыши имя макроса из списка для редакции.
Нажать кнопку Изменить.
Примечание: После редакции макроса можно закрыть редактор VBA
Пример создание процедуры через макрос.
Создадим процедуру очищающую указанную строку активного листа. Для этого сначало создадим макрос очищающий строку.
1)Войдите в меню: Сервис-Макросы-Начать Запись и определите книгу где будет записан макрос и введите его имя, без пробелов - ОчисткаСтроки (см. Приложение2, Запись макроса в книгу Excel)
2)Кликните правой клавишей мыши по индексу строки листа и выбирите пункт “Очистить содержимое” (см. рис 16)
Рис 16 очистка содержимого 8 строки
Завершите запись макроса через меню: Сервис-Макросы-Остановить Запись
Теперь в вашей книги есть макрос – ОчисткаСтроки, который очищает содержимое 8 строки активного листа. Но вам нужна процедура, очищающая определенную строку активного листа. Для этого необходимо отредактировать макрос в указанную процедуру:
1)Войдите в код вашего макроса (см. Приложение2, быстрый переход в код макроса)
2)Макрос имеет код:
Sub ОчисткаСтроки()
'
' ОчисткаСтроки Макрос
' Макрос записан 02.07.04 (Тихвинский В.И.)
'
Rows("8:8").Select
Selection.ClearContents
End Sub
3)Внесем изменения в код макроса:
Sub ОчисткаСтроки(Строка)
'
' ОчисткаСтроки Макрос
' Макрос записан 02.07.04 (Тихвинский В.И.)
'
'
Rows(Строка).Select
Selection.ClearContents
End Sub
В результате вышеописанных действий получена процедура очистки указанной строки активного листа.