Процедура типу Sub і процедура типу Function
У мові VBA існує кілька типів процедур Sub i Function. Процедура типу Sub (процедура-підпрограма) — це частина програми, яка може виконуватися незалежно.
Синтаксис процедури типу Sub:
Sub Ім'я [(аргументи) ]
... <оператори>
End Sub
Ім'я — це унікальне ім'я процедури, складене відповідно до правил мови VBA. Список аргументів (необовязковий параметр в круглих дужках). Якщо аргументи у процедурі відсутні, то після імені ставиться порожня пара дужок.
Область дії кожної процедури визначається вказаним при її оголошенні ключовим словом — Private або Public. При цьому можна виділити три типи області дії процедур.
1. Процедура, оголошена з використанням ключового слова Private, доступна для всіх процедур в даному модулі і недоступна процедурам з інших модулів:
Private Sub Ім’я [(аргументи)]
<оператори>
End Sub
2. Процедура, оголошена з використанням ключового слова Public, доступна для всіх модулів усіх проектів:
Public Sub Ім’я [(аргументи) ]
<оператори>
End Sub
3. Якщо в процедурі наявний оператор Option Private Module, то процедури, оголошені з використанням ключового слова Public, будуть доступні всім програмам даного проекту і недоступні для інших.
Якщо вказати ключове слово Static при оголошені процедури, то всі змінні цієї процедури будуть статичні, тому значення цих змінних будуть зберігатися і після завершення виконання процедури.
Static Sub Ім’я [(аргументи)]
<оператори>
End Sub
Процедура типу Function (процедура-функція) — це клас процедур, що відрізняються від інших тим, що в результаті виконання функції завжди обчислюється одне значення яке присвоюється змінній з іменем даної функції. Функції створюються тоді, коли деякі обчислення потрібно виконувати кілька разів у програмі з різними значеннями параметрів.
Синтаксис процедури типу Function:
Function <ім'я функції> ([аргументи функції])
<оператори>
End Function
де:
ім'я функції — значення, яке повертається у процедуру виклику після виконання процедури;
аргументи функції —імена змінних, значення яких використовуються функцією;
Останній оператор у тілі функції - оператор присвоєння імені функції обчисленого значення.
Приклад
Function TotalTax(Cost)
StateTax=Cost*0.05 ‘Податки штату 5%
CityTax= Cost*0.015 ‘Міські податки 1,5 %
TotalTax= StateTax + CityTax
End Function
Модулі не зберігаються у окремих файлах тому, щоб використовувати один і той самий модуль у різних проектах його слід експортувати у окремий файл з розширенням .bas вказівкою File→ Export File, вказати місце зберігання та ім’я, а потім імпортувати його у потрібний проект вказівкою File→Import File.
Для виконання деякої процедури вибрати команду меню редактора VBA Tools→ Macros і у діалоговому вікні Macros у списку Macro Name вибрати ім’я процедури та клацнути на кнопці Run (Выполнить) або просто натиснути клавішу <F5>.
Більш зручний запуск процедур здійснюється за допомогою кнопки на панелі швидкого доступу. Для її створення необхідно виконати наступні дії:
1. Клацнути вгорі над документом на кнопці Настройка панели быстрого доступа і у контекстному меню вибрати команду Другие команды…(Рис. 10)
Рис. 10. Діалогове вікно Настройка панели Рис.11. Вибір групи команд Макросы у діалоговому вікні быстрого доступа у додатку Word 2010 Параметры Word і створення нової кнопки
2. У діалоговому вікні Параметры Word у списку Выбрать команды из клацнути Макросы.
3. У списку зліва виділити потрібне ім’я і клацнути кнопку Добавить(Рис. 11). В результаті у список відібраних команд буде додано ім’я програми, а після натиснення на кнопку ОК на панелі швидкого доступу з’явиться нова кнопка.
4. Для того щоб змінити зображення на створеній кнопці необхідно у діалоговому вікні
Параметры Word клацнути Изменить і у діалоговому вікні Изменение кнопки вибрати готове зображення та закрити вікно.
Якщо при створенні макроса в Microsoft Word комбінацію клавіш для його запуска не було призначено, то це можна зробити пізніше, у діалоговому вікні Параметры Word. Для призначення комбінації клавіш макросу (чи VBA-програмі) у Word виконати наступні дії:
1. В меню Файл вибрати команду Параметры і у вікні Параметры Word перейти у розділ Настройка ленты. Клацнути на кнопці Настройка, розміщеній у нижній частині вікна.
2. У вікні Настройка клавиатуры вибрати у списку Категория значення Макросы, потім у списку Макросы вибрати ім’я програми (чи макросу).
3. У полі Новое сочетание клавиш ввести призначену для виклику програми комбінацію клавіш і клацнути на кнопці Назначить, а потім на кнопці Закрыть.
Тепер викликати вказану VBА- програму можна буде за допомогою призначеної комбінації клавіш.
Для визначення (або зміни) комбінації клавіш у середовищі Microsoft Excel, треба виконати наступні дії:
1. На стрічці перейти на вкладинку Вид і у групі Макросы вибрати в меню кнопки Макросы команду Макросы. Відкриється діалогове вікно Макрос. У списку Имя макроса вибрати програму і клацнути на кнопці Параметры.
2. У діалоговому вікні Параметры макроса ввести клавишу, яка у комбінації з <Ctrl> буде використовуватися для виклику вказаної VBA-програми. Для поверненя в програму клацнути на кнопці ОК.
Для видалення деякого модуля потрібно виділити його і виконати вказівку File→ Remove object_name.