Запрошуємо Вас взяти участь в презентації нової методики з маркетингу та цінних паперів

(Примітка! Потрібно одразу уважно і правильно набирати його з клавіатури, не використовуючи зайвих команд видалення символів, переміщення курсору тощо, оскільки все це призводить до запису непотрібних інструкцій у макросі, що створюється).

Натиснути кнопку Остановить запись на панелі Остановка записи.

Перевірити створений макрос Запрошення, використовуючи алгоритм запуску процедури.

6. Створення процедури Введення.

Відкрити макрос для редагування, обравши команду Сервис4Макрос4 Макросы. Вибрати зі списку макрос Запрошення_ПрізвищеСтудента і натиснути кнопку Изменить.

Виділити всі оператори між ключовими словами процедури Sub Запрошення_ПрізвищеСтудента () і End Sub.

Виконати команду Правка4Копировать (Edit4Copy). Виділений фрагмент знаходиться тепер у буфері обміну.

Ввести у поле Имя (Name) назву процедури Введення_ПрізвищеСтудента та натиснути ОК.

Виконати команду Правка4Вставить (Edit4Paste). При цьому розділ, скопійований в буфер обміну, вставиться в процедуру.

Розмістити курсор наприкінці рядків перед інструкцією End Sub. Натиснувши один раз клавішу <Enter>, вставити порожній рядок між останнім рядком та інструкцією End Sub.

Ввести наступні команди, в точності повторюючи їх написання (назви команд, наявність пробілів, двокрапок, крапок, лапок, текст в лапках має точно збігатись зі зразком!):

Selection.TypeText Text:=" Презентація відбудеться "

Selection.TypeText Text:=InputBox("Введіть число та місяць проведення презентації:")

Selection.TypeText Text:=" поточного року."

Selection.TypeParagraph

Selection.TypeText Text:="Контактний телефон: "

Selection.TypeText Text:=InputBox("Введіть номер контактного телефону:")

Selection.TypeText Text:="."

Selection.TypeParagraph

Selection.TypeParagraph

Selection.TypeText Text:="З повагою, голова оргкомітету "

Selection.TypeText Text:=InputBox("Введіть прізвище та ініціали голови оргкомітету:")

Selection.TypeParagraph

Команда InputBox призначена для відкриття діалогового вікна, в якому користувач повинен ввести інформацію, що запитується, та натиснути ОК, щоб продовжити виконання процедури.

Записана процедура Введення_ПрізвищеСтудента тепер містить модулі введення даних і, запитавши в користувача необхідну інформацію, вставить в тексті потрібні дані.

Далі необхідно перевірити роботу нової процедури Введення_ПрізвищеСтудента з доданим модулем.

1. У вікні редактора Visual Basic виконати команду Файл4Закрыть и вернуться в Microsoft Word (File4Close and Return to Microsoft Word).

2. Щоб запустити нову процедуру Введення виконати команду Сервис4Макрос4Макросы.

3. У діалоговому вікні Макрос вибрати зі списку макрос Введення_ПрізвищеСтудента і натиснути кнопку Выполнить або двічі натиснути лівою кнопкою миші на імені макросу.

7. Додавання в процедуру інструкції для формування вікна повідомлення.

Відкрити макрос Введення_ПрізвищеСтудента і у вікні Visual Basic розмістити курсор перед першим рядком процедури

Selection.TypeText Text:=" Презентація відбудеться ".

Натиснути клавішу <Enter> і в новому рядку ввести наступне:

MsgBox "Зараз вам буде запропоновано ввести інформацію про презентацію."

Виконати команду Файл4Закрыть и вернуться в Microsoft Word (File4Close and Return to Microsoft Word).

Відкрити новий документ і протестувати відредагований макрос Введення_ПрізвищеСтудента.

На рис. 2.6 показане вікно повідомлення, яке виводиться на екран після запуску відредагованої процедури Введення_ПрізвищеСтудента.

Рис. 2.6. Вікно повідомлення

8. Ще раз протестувати роботу створеної процедури та порівняти результат її виконання зі зразком на рис. 2.3.

9. Використати процедуру Введення_ПрізвищеСтудента при формуванні тексту основного документа для подальшого злиття з існуючим джерелом даних.

10. Оформити електронний звіт засобами текстового процесора Microsoft Word.

11. Ознайомитись з контрольними питаннями та захистити роботу викладачу.

sКонтрольні питання

1. З яких етапів складається процес автоматизації постановки та вирішення фінансово-економічної задачі?

2. Сформулюйте цілі та характеристики підзадач, визначених на другому етапі постановки в процесі виконання даної лабораторної роботи?

3. Що таке макрос і яку структуру він має? Що таке Visual Basic?

4. Який порядок запису макросу та способи його запуску?

5. Як застосовується макрос при роботі з текстом?

6. Як переглянути та відредагувати створений макрос?

7. Для чого призначені команди Selection.TypeParagraph, Selection.TypeТext?

8. В який колір пофарбовані ключові команди Visual Basic, коментар, команди форматування тексту та сам текст у макросі, інструкції макросу, які записані невірно?

9. Яку дію виконує макрос по команді InputBox, MsgBox?

10. Якими операторами починається та закінчується макрос?

11. Як створити процедуру, що виводить в процесі роботи макросу на екран вікно введення даних, вікно повідомлення?

12. Опишіть порядок створення макросу, який повністю автоматизує процес злиття основного документа з усіма записами існуючого джерела даних в новий документ.

Поиск по сайту: