Порядок выполнения работы. В ходе выполнения контрольной работы студенту необходимо будет ответить на один теоретический вопрос и выполнить два практических задания

Задание.

В ходе выполнения контрольной работы студенту необходимо будет ответить на один теоретический вопрос и выполнить два практических задания. Оформить все задания на листах формата А4 с титульным листом, представленным в приложении. В отчете по практическим заданиям представить тексты полученных макросов и, по-возможности, скриншоты результаты работы макросов.

Задание 1. Теоретический вопрос.

1. Запись макроса в Word.

2. Запись макроса в Excel.

3. Редактор Visual Basic. (запуск редактора, окна редактора VB).

4. Редактор Visual Basic. (меню редактора).

5. Редактор Visual Basic. (панели инструментов).

6. Типы данных в Visual Basic.

7. Переменные в Visual Basic.

8. Константы в Visual Basic.

9. Выражения в Visual Basic.

10. Математические функции Visual Basic.

11. Использование If…Then…Else.

12. Команды организации циклов в Visual Basic.

13. Использование массивов.

14. Управление файлами с помощью VBA.

15. Атрибуты файла.

16. Использование встроенных диалоговых окон Excel для получения имен файлов.

17. Использование встроенных диалоговых окон Word для получения имен файлов.

18. Работа с дисками и папками.

19. Копирование и удаление файлов.

20. Переименование и перемещение файлов.

21. Формы пользователя. Свойства объекта UserForm.

22. Формы пользователя. Методы объекта UserForm.

23. Формы пользователя. Элементы управления.

24. Формы пользователя. Использование Toolbox.

25. Работа с объектами Worksheets в Excel.

26. Методы, возвращающие объекты Range, в MS Excel.

27. Использование метода Cells в MS Excel.

28. Работа с объектами Document в MS Word.

29. Работа с объектами Template в MS Word.

30. Работа с объектами Selection и Range в MS Word.

Задание 2. Интегрированная среда VBA в Word.

Цель задания

Изучить настройки host-приложения, настройки среды VBA.

Порядок выполнения работы

Внимательно прочитать данное методическое пособие и выполнять все примеры и задания.. В отчет оформлять только задания.

Содержание отчета

- наименование и цель работы;

- результаты работы программы.

Краткая теория

4.1 Настройка host-приложения.

Для разрешения выполнения макросов в среде Office необходимо отключить контроль запуска макросов host-приложением следующей последовательностью команд:

Сервис→Макрос→Безопасность→Низкая.

Для отображения панели VBA в Word выполните:

Сервис→Настройка→Панель инструментов→Visual Basic.

Назначение кнопок панели VBA

· «выполнить макрос» - для выбора макроса из шаблонов или открытых документов и его запуска;

· «записать макрос» - для записи макроса с помощью ввода текста с клавиатуры в поле документа и использования команд меню Word;

· «редактор Visual Basic» - для открытия или перехода в редактор VBA;

· «элементы управления» - для обеспечения обмена информацией с пользователем, минуя документ Word;

· «режим конструктора» - для конструирования интерфейса VBA – программы с пользователем с помощью форм и палитры элементов управления.

4.2 Настройка среды VBA

В состав среды VBA входят следующие элементы:

Окно навигатора проекта (Project Explorer) – отображает состав проекта (документы, шаблоны, формы, модули, модули классов) и позволяет добавлять и удалять элементы проекта: формы, модули, модули классов;

Окно исходного кода – предназначено для редактирования текста программы на VBA;

Окно свойств – отображает перечень свойств и позволяет редактировать значения свойств;

Окно отладки – предназначено для вывода отладочной информации с помощью редактора: debug.print Text;

Формы – диалоговые формы пользователя, содержащие интерфейсные элементы управления для VBA – программ, предполагающих специализированный обмен данными с пользователем;

Браузер объектов Office – предназначен для просмотра иерархии объектной модели Office.

Настройка панелей в среде VBA:

1. Добавьте панели Edit

2. Добавьте панели Standard

3. Добавьте обозреватели для Навигатора проекта, Окна свойств, Браузера объектов, Исходного кода.

4. Добавьте обозреватели для Списка свойств/методов, Списка констант, Контекстной подсказки, Принудительного завершения синтаксиса (вызов разрешенного синтаксиса).

Настройка редактора VBA

1. Произведите следующие действия в редакторе опций Tools→Options→Editor:

· Снимите флажок с пункта «требовать объявления переменных»

· Снимите флажок с автоматического контроля синтаксиса

2. Произведите следующие действия в окне свойств проекта Tools→Project Properties→Protection→Lock Project

· Снимите флажок с блокировки проекта просмотра.

Возможности макрорекодера.

Особенности записи макроса:

a) именование макроса – в соответствии с соглашением об именовании переменных (русские имена допускаются);

b) локализация места хранения – документ;

c) назначение панелей и клавиш для быстрого вызова макроса (необязательно);

d) просмотр и редактирование кода в среде VBA.

Способы выполнения макроса:

1. запуск макроса из среды host – приложения;

2. запуск макроса из среды VBA;

3. выполнение в среде VBA в режиме отладки.

Пример 1.

Рассмотрим основной способ вывода текста в документ Word:

1. создайте новый документ и сохраните его под именем «тест.doc» или «проба.doc».

2. включите запись (запуск макрорекодера).

3. напишите какое-либо слово или предложение в созданном документе Word.

4. остановите запись и просмотрите макрос в редакторе VBA:

Sub Макрос1()

Selection.TypeText Text:=”Ваш текст”

End Sub

5. измените выводимый текст в редакторе VBA и запустите макрос из среды VBA.

6. просмотрите изменения, произошедшие в документе Word.

Пример 2.

Рассмотрим способ вывода информации не в документ Word, а в стандартное диалоговое окно. Данный способ можно осуществить только средствами VBA.

1. измените текст макроса следующим образом:

Sub Макрос1()

MsgBox (“Мое первое сообщение”)

debug.print “Мое первое сообщение”

End Sub

Краткие пояснения:

MsgBox (“Мое первое сообщение”)- это вызов стандартного диалога для сообщения;

debug.print “Мое первое сообщение” – этот оператор выводит текст в окно отладки, которое располагается ниже окна редактора VBA.

2. запустите макрос и убедитесь в правильности его работы.

3. обратитесь к справочной системе VBA для изучения особенностей работы стандартного диалога сообщений. Для этого, в редакторе VBA выделите имя функции MsgBox и нажмите F1. Появится окно справки, в котором можно ознакомиться с параметрами вызова этой функции.

Стандартный диалог сообщений имеет развитые средства взаимодействия с пользователем. Ее синтаксис следующий:

Response=MsgBox (prompt,buttons,title).

При запуске этой функции можно задать имя окна (title), само сообщение (prompt) и оформление окна (buttons), а также есть возможность определить какую кнопку нажал пользователь при закрытии этого окна (Response). Только параметр prompt является обязательным, остальные параметры - необязательные и их можно опускать. Оформление окна можно задавать следующими константами:

Возвращаемый параметр Response в зависимости от нажатой пользователем клавиши может принимать следующие значения:

Вышеописанный диалог полезно использовать для получения пользователя различных сведений, например о том, следует ли удалять файл с жесткого диска или удалять записи из базы данных, или подтверждение о сохранении файла под новым именем и т.д.

Пример 3.

Рассмотрим способ вызова диалога сообщений с использованием всех указанных параметров. При этом параметр Response выведем в окно отладки для просмотра его значения.

1. измените текст макроса из примера 2 следующим образом

Sub Макрос1()

Название_окна = «Мой первый диалог»

Сообщение = «мое первое сообщение»

Стиль_окна = vbOKCancel + vbInformation

Ответ = MsgBox(Сообщение, Стиль_окна, Название_окна)

Debug.Print Ответ

End Sub

2. запустите макрос и убедитесь в правильности работы диалога сообщений.

3. просмотрите окно отладки и убедитесь, что числовая константа соответствует нажатой клавише.

Задание 2.1. Меняя стиль окна в макросе из примера 3, исследуйте несколько возможных способов оформления окна сообщений, оснащая его различным набором кнопок и значков.

Задание 2.2. Измените макрос из примера 3 так, чтобы имя нажатой клавиши выводилось в другое диалоговое окно, вместо вывода числовой константы в окно отладки. Подсказка: для этого воспользуйтесь оператором условного перехода.

If Ответ = 1 Then Имя = “OK”

If Ответ = 2 Then Имя = “Cancel”

If Ответ = 3 Then Имя = “Abort”

If Ответ = 4 Then Имя = “Retry”

If Ответ = 5 Then Имя = “Ignore”

If Ответ = 6 Then Имя = “Yes”

If Ответ = 7 Then Имя = “No”

If Ответ < 1 And Ответ > 7 Then Имя=“Имя не определено”

Задание 2. 3. Измените макрос из задания 1 так, чтобы имя кнопки определялось не оператором условного перехода, а оператором множественного выбора.

Подсказка:

Select Case Ответ

Case 1: Имя = “Ok”

Case 2: Имя = “Cancel”

Case 3: Имя = “Abort”

Case 4: Имя = “Retry”

Case 5: Имя = “Ignore”

Case 6: Имя = “Yes”

Case 7: Имя = “No”

Case Else: Имя = “Имя не определено”

End Select

Пример 4. Рассмотрим, каким образом повторяющиеся действия, можно организовать в цикл. Для этого:

1. напишите несколько слов в документе Word.

2. включите запись

3. выделите слово (Ctrl+Shift+стрелка вправо), скопируйте его в буфер обмена и вставьте 5 раз подряд.

4. остановите запись и просмотрите текст макроса в редакторе VBA

Sub Макрос1()

Selection.MoveRight Unit:=wdWord, Count:=1,

Extend:=wdExtend

Selection.Copy

Selection.Paste

Selection.Paste

Selection.Paste

Selection.Paste

Selection.Paste

End Sub

Ваш макрос может несколько отличаться от вышеуказанного, если при записи вы совершили лишние действия. Преобразуйте данный макрос в цикл с заданным числом повторений в редакторе VBA следующим образом:

Sub Макрос1()

Dim counter As Integer

Selection.MoveRight Unit:=wdWord, Count:=1,

Extend:=wdExtend

Selection.Copy

For counter = 1 To 5 Step 1

Selection.Paste

Next

End Sub

Убедитесь в правильности его работы.

Пример 5. Назначение макросу комбинации клавиш для быстрого вызова:

1. нажмите кнопку «записать макрос»

2. введите имя «Макрос2»

3. сделайте макрос доступным для документа

4. выберите «назначение макроса клавишам»

5. назначьте сочетание клавиш, нажав на клавиатуре комбинацию, например: Ctrl+:

6. выберите сохранение изменений «в документе»

7. нажмите кнопку «назначить», а потом «закрыть»

8. в качестве действий макроса определите следующее:

· Правка→Выделить все

· Формат→Шрифт→Полужирный

9. остановите запись

10. верните начертание шрифта к прежнему виду

11. откройте редактор VBA

Sub Макрос2()

Selection.WholeStory

With Selection.Font

.Bold = True

.Italic = False

End With

End Sub

12. вернитесь в редактор Word, нажмите установленную вами комбинацию клавиш для быстрого запуска макроса и убедитесь в его правильной работе.

Пример 6. Назначение макросу кнопки на панели для быстрого вызова:

1. нажмите кнопку «записать макрос»

2. введите имя «Макрос2»

3. сделайте макрос доступным для документа

4. выберите «назначение макроса панели»

5. зацепите мышкой иконку команды из категории макросов и перетащите ее на панель Word

6. выберите сохранение изменений «в документе»

Все остальные действия выполняйте аналогично действиям из примера 5.

Для запуска макроса можно использовать выведенную Вами на панель инструментов кнопку.

Внимание! Для изменения иконки воспользуйтесь пунктом меню: Вид→Панели инструментов→Настройка. После чего щелкните правой кнопкой мыши на панели, чью иконку вы хотите изменить. В раскрывшемся меню воспользуйтесь пунктами:

Изменить значок

Выбрать значок

Стили: основной, только текст, значок и текст.

Пример 7. Назначение макросу кнопки на документе для быстрого вызова.

1. нажмите кнопку «режим конструктора» на панели VBA в среде Word.

2. установите курсор ввода в том месте документа, где бы вы хотели расположить кнопку.

3. щелкните по кнопке, нарисованной на панели элементов управления.

4. на месте курсора должна появиться кнопка под названием «CommandButton1». Местоположение и размеры данной кнопки можно менять путем перетаскивания ее мышкой в пределах документа.

5. для написания реакции на событие нажатия данной кнопки, двойным щелчком по ней войдите в редактор VBA.

6. в редакторе наберите команду Shell “Calc.exe”

7. в окне свойств кнопки откройте свойства по категориям и измените название кнопки в поле «Caption» вместо «CommandButton1» наберите «Калькулятор». Если калькулятор установлен в ОС, то он должен отобразиться поверх документа.