Запис, створення, виконання, переривання, видалення та копіювання макросу в редакторі Microsoft Visual Basic

Для копіювання частин макросів, можна використовувати такий алгоритм:

1. Встановіть Середній або Низький рівень безпеки (Див. 8.4.1. пункт 1.).

2. Відкрийте книгу, що містить макрос, якому потрібно скопіювати.

3. У меню Сервіс виберіть пункт Макрос, а потім виконайте команду Макросы.

4. У поле Имя макроса введіть ім'я того макросу, який потрібно скопіювати.

5. Натисніть кнопку Изменить.

6. Виділіть рядок макросу, який потрібно скопіювати.

7. При копіюванні всього макросу цілком переконайтеся, що рядки Sub і End Sub включені у виділену область копіювання.

8. На стандартній панелі інструментів натисніть кнопку Копировать (або комбінацію клавіш Ctrl+c).

9. Переключіться в модуль, у який потрібно вставити скопійовані рядки.

10. Натисніть кнопку Вставити (комбінація клавіш Ctrl+v).

Приклад 2. В Прикладі 1. в нас задіяна комбінація клавіш Ctrl+w. Для того щоб ця комбінація клавіш працювала при будь-якій мові введення (англійська, російська, українська), створимо ще один макрос, який буде копією попереднього макросу, тільки буде використовувати комбінацію клавіш Ctrl+ц. Для цього:

1. У меню Сервис вибираємо команду Макрос і підкоманду Макросы.

2. В діалоговому вікні Макросы виберіть макрос Формат1 і натисніть кнопку Изменить (Рис 8.3.).

Рис.8.3 – Діалогове вікно „Макрос”

Рис.8.4 – Вікно редактора „Microsoft Visual Basic”



3. Відкриється редактор Microsoft Visual Basic.(рис.8.4.). В якому нам потрібно скопіювати до буфера обміну текст у вікні.(Починаючи з Sub Формат1 і закінчуючи End Sub) використовуючи комбінацію клавіш Ctrl+C, або в пункті меню Правка вибрати пункт Копировать.

4. Виділяємо весь текст макросу (Починаючи від Sub і закінчуючи End Sub) і копіюємо його в буфер обміну (комбінацією клавіш Ctrl+c).

5. В вікні Project-VBAProject натискуємо правою кнопкю на значку Modules. Далі в меню вибираємо Insert і в слідуючому меню Module.

6. Створиться нове вікно з назвою Книга1(Module2)(Code). В це вікно вставляємо скопійований текст (Комбінацією клавіш Ctrl+v).

7. В скопійованому тексті змінюємо назву макросу, наприклад Формат2.

8. Закриваємо вікно редактора Visual Basic і повертаємось в Excel.

9. Вибираємо в Сервис|Макрос|Макросы створений нами макрос і натискуємо кнопку Параметы. В Сочетание клавиш ставимо букву ц, натискуємо кнопку Ok після чого закриваємо вікно Макрос.