Приклад 1. Форматування слова чи фрази

Припустимо, що ви часто форматуєте слова чи короткі фрази, до яких хочете привернути увагу у вашій документації, за допомогою напівжирного шрифту Arial 14-го розміру. Стилі Word використовувати не можна, тому що їх можна застосовувати тільки до цілих абзаців або параграфів. Тоді створимо потрібний макрос:

1. Наберіть у поточному документі декілька строк довільного тексту.

2. Виділіть будь-яке слово чи фразу.

3. По команді Сервис >Макрос>Начать запись почніть запис макросу з ім'ям Виділити_Текст; додайте до існуючого опису, наприклад, таке: “ Установлює Arial, Bold 14 для виділеного тексту ”; клацнути по кнопці ОК.

4. Використовуючи список Шрифт на панелі форматування, вибрати шрифт Arial.

5. Використовуючи список Размер на панелі форматування вибрати розмір 14.

6. Щигликом на кнопці Ж на панелі форматування включити атрибут напівжирного шрифту для тексту.

7. Зупинити макрорекордер щигликом на кнопці Остановить запись .

8. Відкрийте будь-який документ Word і спробуйте виконати макрос Виділити_Текст командою Сервис > Макросы > Макрос, попередньо виділяючи слова чи фрази якогось документу.

У наступних прикладах будуть використані стилі користувача, які необхідно створити до початку запису макросу, у якому стилі використовуються. Тому нагадаємо, що потрібно зробити, щоб створити власний стиль. Найпростіше треба - виділити будь-який абзац і відформатувати його потрібним образом, а потім виконати команду Формат > Стиль > Создать, дати ім'я «своєму» стилю і вибрати стиль абзацу, що випливає після абзацу зі своїм стилем, а потім завершити створення «свого» стилю, клацнувши на кнопці ОК і кнопці Применить.

2.3.2.2. Приклад 2. Оформлення приміток у документі.

Може бути, що при підготовці деякого звіту чи статті вам необхідно буде виділяти яким-небудь особливим способом частини тексту, у яких ви хочете або висловити свою думку, дати пораду чи попередити читача про що-небудь. У таких випадках непогано було б помістити в текст заголовок, наприклад, слово Примітка синього кольору і виділити абзац тексту примітки, наприклад, рамкою і червоним шрифтом, тобто відмінним від іншого тексту стилем.

Створимо нові стилі в наступній послідовності. Спочатку краще створити стиль Прімітка_текст для абзацу, що попередньо має границю типу Объемная і шрифт червоного кольору, причому як стиль наступного абзацу вибрати стиль Основной текст. Потім після виділення будь-якого іншого абзацу і форматування його синім кольором з атрибутом напівжирного потрібно створити стиль Примітка_заголовок, причому як стиль наступного абзацу вибрати стиль Примітка_текст.

Тепер створімо наш макрос:

1. Перейдемо на новий рядок тексту – клавіша Enter.

2. По команді Сервис>Макрос>Начать запись почнемо запис макросу з ім'ям Примітка; додамо до існуючого опису, наприклад, таке: "Підготовляє текст - примітка до документа".

3. Клацнемо на кнопці Назначить макрос клавишам і з появою вікна Настройка клавиатуры натиснемо комбінацію клавіш, наприклад, Ctrl + Alt + З, а потім – кнопки Назначить і Закрыть.

4. Після появи на екрані панелі Останов виберемо на панелі стилів стиль Прімітка_заголовок, введемо з клавіатури слово Примітка (цим стилем) і натиснемо Enter.

5. Зупинимо запис макросу.

Перевірити створений макрос Примітка можна шляхом натискання комбінації клавіш Ctrl+Alt+З, але попередньо необхідно перейти на новий рядок тексту. Власне текст примітки вводиться в абзаці з рамкою і закінчується це введення натисканням клавіші Enter.

2.3.2.3. Приклад 3. Підписи до малюнків.

Якщо документ що створюється буде містити велике число малюнків, то корисним буде макрос, що буде автоматично задавати номер чергового малюнка з деяким власним стилем і встановлювати стиль підпису під малюнком. Після виконання такого макросу залишається тільки ввести текст підпису.

Виконайте наступні кроки:

1. Створіть стиль Рис_текст, вибравши шрифт Arial з абзацом без відступу і стилем наступного абзацу Основной текст.

2. Створіть стиль Рис_номер, вибравши шрифт Arial з абзацом з відступом 0,5 см і атрибутом напівжирний і стилем наступного абзацу Рис_текст.

3. По команді Сервис-Макрос-Начать запись почати запис макросу з ім'ям Номер_малюнка; додайте до існуючого опису, наприклад, таке:”Автоматично нумерує малюнок, установлює стиль підпису малюнка”.

4. Клацніть на кнопці Назначить макрос клавишам і з появою вікна Настройка клавиатуры натисніть комбінацію клавіш, наприклад, Ctrl+Alt+N, а потім – кнопки Назначить і Закрыть.

5. Після появи на екрані панелі Остановка записи виконайте команду Вставка - Название для виводу вікна Название; клацніть у цьому вікні на кнопці Создать й у вікні Новое название введіть, наприклад, Рис.1. і клацніть на кнопці ОК, а у вікні Название знову – ОК.

6. У результаті на екрані з'явиться текст Рис.1.х, де х – це номер чергового малюнка; установіть стиль поточного рядка Рис_номер і натисніть Enter.

7. Зупиніть запис макросу.

Тому що в ході створення стилів для макросу в текст документа Word могли бути внесені небажані зміни, видалите їх. Випробуйте створений макрос вставкою 4-5 картинок з галереї Word ClipArt (командою Вставка>Рисунок>Картинки, а після вибору категорії і малюнка вставте його в документ шляхом вибору команди Добавить з контекстного меню, яке можна відкрити правою кнопкою миші). Додайте до малюнків придатні підписи, виконуючи макрос комбінацією клавіш Ctrl+Alt+N.

2.3.2.4. Приклад 4. Написання тексту процедури і її модернізація.

У даному прикладі розглядається спосіб ручного створення вихідного коду процедури. Таку процедуру можна додати у вже існуючий модуль VBA чи в новий модуль. Код нової процедури у вже існуючому модулі потрібно розмістити після оператора End Sub, що завершує попередню процедуру, і перед оператором Sub <ім'я> (), що починає наступну процедуру в модулі. Нова процедура може бути цілком написана набором її тексту на клавіатурі. У редакторі VBA є засоби, що прискорюють процес набору. Наприклад, після натискання на Enter після введення ключового слова Sub і імені процедури редактор автоматично додає ключові слова End Sub. Крім того, на екрані в ході набору можуть з'являтися спливаючі вікна з підказками по списках аргументів убудованих у текст процедур.

Розглянемо порядок дій для створення нової процедури в новому модулі VBA, що виводить деяке повідомлення на екран, а також спробуємо модифікувати код процедури.

1. Створіть новий документ і збережіть його з ім'ям, наприклад, Мої макроси.

2. Натисніть Alt +F11 для активізації редактора VBA.

3. У лівому верхньому вікні Project Explorer редактора VBA виділите документ Мої макроси, у якому буде збережена процедура яку ми збираємося створити.

4. Виконайте команду Insert > Module для додавання нового модуля до проекту. Редактор додає новий модуль і відкриває в правій частині вікно коду.

5. У лівому нижнім вікні Properties - Module 1 перейменуйте новий модуль - дайте йому ім'я, наприклад, FirstProg.

6. Переконайтеся, що курсор вставки тексту знаходиться на початку порожнього рядка в FirstProg (Соdе) і введіть наступний текст, натискаючи на Enter наприкінці кожного рядка для початку нового рядка:

Дата добавления: 2015-01-03