Дана курсова робота служить для заповнення прогалини в цій справі. Головним її завданням є допомогти майбутнім фахівцям з документознавства оволодіти знаннями та навичками комп’ютерної обробки їнформації.

1. Постановка задачі

Підготувати контрольний текст MS Word для випробування макроса, виготовити та випробувати макрос, призначений для пошуку в тексті і виводу на екран знайдених назв місяців.

2. Виконання роботи

2.1. Текст програм

Sub Krob_var4()

Dim i As Integer

For i = 1 To ActiveDocument.Words.Count

If Len(Trim(ActiveDocument.Words(i))) > 20 Then _

ActiveDocument.Words(i).Font.Color = wdColorRed: _

MsgBox "відповідь= " & ActiveDocument.Words(i)

Next i

End Sub

2.2. Словесний алгоритм програм

Програма містить один цикл. Параметром циклу є змінна і. Цикл служить для перебору слів тексту MS Word. Цикл містить розгалуження, яке служить для пошуку слів які довші за 20 букв. Воно призначене для відшукання слів та зафарбування тих слів в червоний колів, якщо вони – довші за 20 букв.

2.3. Таблиця ідентифікаторів програм

Ім’я змінної в програмі | Призначення змінної

i | змінна цілого типу, параметр циклу

2.4. Опис одержаних результатів

Для випробування програми використовувався такий контрольний текст:

21 січня приїхаладодомуібулатам до вересня, а в суботу виїхала.

Після запуску програми слова приїхаладодомуібулатам були зафарбовані в червоний колір. Це – слова довші за 20 символів, програма виконала роботу, задану в постановці задачі.

3. Перелік та короткий опис використаних програмних засобів

3.1. Створення макроса за допомогою макрорекордера

Мета роботи: освоєння прийомів виготовлення макроса в середовищі додатків до Windows 95, програмування макроса шляхом виконання певного переліку операцій над документом і автоматичного запису цих операцій у вигляді інструкцій мови Visual Basic for Application, запуску та перевірки роботи макроса.

Макрос представляє собою програму, написану мовою Visual Basic for Application. Він призначений для автоматизації рутинної та непродуктивної роботи з документами. Як правило, макроси використовують для розширення можливостей додатків до Windows 95, зокрема MS Word, MS Excel та ін. Зберігається макрос у тому самому файлі, де знаходиться документ, який він обробляє.

Макрос можна виготовити за допомогою макрорекордера або редактора Visual Basic. Макрос, виготовлений за допомогою макрорекордера, має обмежені можливості, бо може виконувати лише види робіт, передбачені додатком. Рекомендується виготовляти макрос за допомогою макрорекордера, а потім доповнювати його засобами Visual Basic за допомогою редактора макросів.

Для виготовлення макроса за допомогою макрорекордера служить команда головного меню: Сервіс – Макрос – Почати запис. Під час виконання цієї команди появляється вікно Запис макроса, призначене для найменування макроса. Макрорекордер пропонує свої варіанти імен – Макрос1, Макрос2 і т. д., можна погодитися з ним і натиснути клавішу Ok. Після цього необхідно виконати всі роботи, які повинен буде повторити макрос. Для закінчення запису макроса служить команда Припинити запис із одноіменного віконця, розташованого на фоні документа. Якщо це віконце випадково виявилося відсутнім, його можна встановити командою головного меню: Вигляд – Панелі інструментів – Припинити запис.

Всі операції над документом, виконані під час запису макроса, виявляться записаними у вигляді інструкцій Visual Basic. Текст макроса можна переглянути і відредагувати за допомогою команди головного меню: Сервіс – Макрос – Макроси, яка викликає вікно Макрос. У цьому вікні вибираємо команду Змінити, після чого появляється вікно редактора макросів Microsoft Visual Basic з текстом макросів. Запуск готового макроса забезпечується командою Виконати з вищезгаданого вікна Макрос.

Приклад. Постановка задачі: виготовити макрос, який додає в кінець тексту відкритого документа MS Word слова “До зустрічі”, окрашені в червоний колір. Описати команди одержаного макроса.

Виготовлення макроса:

відкриваємо документ MS Word;

виконаємо команду головного меню: Сервіс – Макрос – Почати запис;

у вікні Запис макроса погодимось на пропозицію рекордера назвати новий макрос Макрос1 (може бути Макрос2, Макрос3 і т.д.), натиснемо клавішу Ok;

появляється вікно Документ MS Word, у ньому перенесемо курсор на кінець тексту командою Ctr+End;

вносимо текст До зустрічі.;

натискаємо клавішу Home для переводу курсора на початок рядка;

натискаємо клавіші Shift+End для виокремлення рядка;

на панелі інструментів Малювання вибираємо колір шрифту – Червоний;

у вікні Припинити запис натискаємо клавішу Припинити запис, вона має вигляд заштрихованого синім кольором квадратика.

Перегляд тексту макроса:

у вікні Документ MS Word виконуємо команду Сервіс – Макрос – Макроси;

у вікні Макрос вибираємо ім’я макроса та команду Змінити.

Текст макроса у вікні MS Visual Basic має вигляд:

Sub Макрос1()‘‘

Макрос1 Макрос‘

Макрос записан 30.11.02 DroNgo‘

Selection.EndKey Unit:=wdStory

Selection.TypeText Text:=”До зустрічі.”

Selection.HomeKey Unit:=wdLine

Selection.EndKey Unit:=wdLine, Extend:=wdExtend

Selection.Font.Color = wdColorRed

Selection.TypeParagraph

End Sub

Опис інструкцій макроса:

Sub Макрос1() – початок програми, назва макроса;‘

‘ Макрос1 Макрос

‘ Макрос записан 30.11.02 DroNgo

‘ – коментарі програми, які не виконуються, вони служать для пояснення програми;

Selection.EndKey Unit:=wdStory – перенесення курсора на кінець тексту відкритого документа;

Selection.TypeText Text:=”До зустрічі.” – занесення тексту До зустрічі;

Selection.HomeKey Unit:=wdLine – перенесення курсора на початок рядка тексту;

Selection.EndKey Unit:=wdLine, Extend:=wdExtend – виокремлення рядка тексту;

Selection.Font.Color = wdColorRed – надання виокремленому фрагменту червоного кольору;

Selection.TypeParagraph – переведення курсора на наступний рядок;

End Sub – кінець програми.

Виконати макрос можна, натиснувши кнопку-команду Виконати у вікні Макрос або у вікні редактора Microsoft Visual Basic.

3.2. Редагування макроса за допомогою редактора Visual Basic

Мета роботи: освоєння прийомів редагування макроса в середовищі додатків до Windows 95, налагодження, запуску та перевірки роботи макроса.

Редагування макроса відбувається в режимі редактора Visual Basic, який викликається командою Змінити у вікні Макрос. Під час редагування можна використовувати конструкції мови Visual Basic. З них найбільш вживаними