«Word. Автоматизация решения задач. Макросы» (стр. 2 из 2)
- в Word при нажатии кнопки [Панели] (см. рис. 1) в диалоговом окне Запись макроса появляется диалоговое окно Настройка, в котором на вкладке Команды из поля со списком Категории выбирается Макросы, а затем имя макроса;
- после нажатия левой кнопки мыши на имени макроса появляется пунктирное изображение кнопки, которую следует отбуксировать на панель инструментов. После этого левая кнопка мыши отпускается;
- щелкнув по кнопке [Изменить выделенный объект], можно выбрать понравившийся значок для кнопки, запустив команду Выбрать значок для кнопки (рис. 4). Можно также редактировать значок с помощью команды Изменить значок для кнопки (окно Редактор кнопок) (рис. 5).
Рис. 3. Диалоговое окно Настройка для назначения макросу
кнопки на панели инструментов в Microsoft Word
Рис. 4. Диалоговое окно выбора значка для кнопки
Рис. 5. Диалоговое окно Редактор кнопок
В Excel дополнительно имеется возможность запуска макроса посредством назначенного ему графического образа.
После выбора способа вызова появляется небольшая панель инструментов Остановить запись, содержащая кнопку:
- [Остановить запись] – завершает запись макрокоманды; [Пауза] – приостанавливает запись макрокоманды (рис. 6).
Рис.6. Панель записи макроса в Microsoft Word
Все действия пользователя – выбор пунктов меню, параметров в диалоговых окнах – протоколируются системой и записываются средствами языка VBA.
Макросы сохраняются в шаблоне в виде текстов программ. Каждый шаблон может содержать произвольное количество макросов. Поскольку dot-файлы (dot – расширение файлов шаблонов) нельзя читать как документы, в Word существуют специальные средства, позволяющие просмотреть и отредактировать макрос как последовательность операторов на языке VBA (рис.10). В процессе редактирования любой макрос представлен в виде последовательности операторов языка VBA. Суть редактирования макроса состоит в удалении, добавлении и замене операторов, как при программировании на любом другом языке.
Рис.10. Диалоговое окно редактора VBA
Редактирование макроса выполняется посредствам команды Макросы. В диалоговом окне Макрос, в поле Имя выбирается имя макроса, подлежащего редактированию. Процесс начинается при нажатии кнопки [Отладка]. Можно указать имя несуществующего макроса. Если после этого нажать кнопку [Создать], будет создан новый макрос, а пользователь получит возможность получит возможность записать его на языке VBA.
Кнопка [Отладка] служит для открытия окна редактирования макроса, в котором отображается содержимое макроса на языке VBA. Окно редактирования макроса подобно обычному окну документа, но отличается отсутствием координатной линейки и наличием специальной панели инструментов. Можно открыть несколько окон обработки макросов. Текст макроса редактируется так же, как обычный текст программы VBA. При этом доступно большинство команд редактирования текста, например команды Копировать и Вырезать.
С помощью кнопки [Удалить] указанный макрос удаляется.
Чтобы закрыть окно редактирования макроса, можно использовать системное меню окна редактирования или команду Закрыть в меню Файл. Специфические команды, предназначенные для редактирования и отладки макроса, выполняются путем нажатия кнопок в строке удаления.
Задание1. Создать макрос для оформления заголовков, который изменяет цвет и размер шрифта в выделенном фрагменте текста:
- цвет шрифта - Синий;
- размер и тип шрифта – 16, Arial Black;
- выравнивание – По центру.
Назначить созданному макросу комбинацию клавиш.
Порядок выполнения:
1. Создать несколько пустых строк в документе.
2. Выделить заголовок или любой фрагмент текста в документе.
3. начать запись макроса, выполнив команду Сервис- Макрос- Начать запись.
4. В появившемся диалоговом окне Запись макроса, в поле Имя ввести имя макроса, например, Заголовок.
5. В этом диалоговом окне Запись макроса в разделе Описание введите краткое того, что будет делать данный макрос, например, Оформляет заголовки.
6. В разделе Назначить макрос нажать кнопку [клавишам].
7. В появившемся окне Настройка активизировать поле Новое сочетание клавиш, затем нажмите любое сочетание управляющих клавиш [Ctrl] (или [Alt]) и какую-нибудь алфавитно-цифровую клавишу, например, [Alt+Z].
8. Под этим полем появятся слова Текущее назначение. Если далее в квадратных скобках стоит слово [нет], то это значит, что данная комбинация клавиш нигде ранее не назначалась, и ее можно использовать, нажав кнопку [Назначить]. Назначенная комбинация клавиш перейдет в поле Текущее сочетание клавиш, что означает: выбранная комбинация назначена данному макросу.
9. Нажать кнопку [Закрыть] и затем [ОК].
10. Выполнить последовательность действий, непосредственно входящих в макрос, которые изменяют цвет и размер шрифта:
- выполнить команду Формат-Шрифт;
- в поле Цвет установить требуемый цвет;
- в поле Размер выберите нужный размер и тип шрифта;
- выравнивание- По центру;
- завершить запись макроса, нажав кнопку [Остановить запись] на панели инструментов для создания макроса, или выполнить команду Сервис- Макрос- Остановить запись. Будет создан макрос с именем Заголовок, оформляющий заголовки в разработанном стиле.
11. Запустить макрос, предварительно набрав и выделив заголовок, например, «Годовой отчет предприятия», а затем нажав назначенные вами клавиши (в данном случае [Alt+Z]). Теперь по нажатию комбинации клавиш [Alt+Z] любой выделенный фрагмент текста будет оформляться как заголовок по заданному в макросе образцу.
Задание 2. Создать макрос, который форматирует таблицы, и назначить кнопку на пенели инструментов.
Порядок выполнения:
1. Создать произвольную таблицу, выполнив команду Таблица- Добавить- Таблица, указав нужное количество строк и столбцов, например, 2 (два) и 4 (четыре) строки; нажмите [ОК].
2. Вызвать диалоговое окно Запись макроса, выполнив команду Сервис- Макрос- Начать запись.
3. Наберите имя и описание макроса, например, Таблица и Форматирует таблицу.
4. В поле Назначить макрос нажать кнопку [Панели].
5. В диалоговом окне Настройка выберите вкладку Команды. Нажать на имя нужного макроса левой кнопкой мыши и, не отпуская, отбуксировать в то место на панели инструментов, куда следует вставить кнопку с именем макроса.
6. Щелкнуть по кнопке [Изменить выделенный объект], выбрать любой значок для кнопки и нажать [Закрыть]. Теперь начинается запись макроса:
- выделить созданную таблицу, выполнив команду Таблица- Выделить- Таблица;
- выполнить команду Формат- Границы и заливка. Сделать рамку, например, двойной линией, выбрать цвет рамки, например, Синий; нажать кнопку [ОК];
- снять выделение, нажав один раз клавишу управления курсором (-) (стрелка влево). После чего курсор окажется в первой ячейке таблицы;
- выполнить команду Таблица- Выделить- Строка. Для выделенной строки установить шрифт 16, полужирный; поставить выравнивание – По центру, выполнив команду Формат- Абзац;
- нажать кнопку [Остановить запись].
7. Подготовить любую таблицу, заполнив в ней название столбцов, и применить макрос Таблица для ее форматирования, нажав назначенную макросу кнопку на панели инструментов. На экране появится следующее:
| ФИО | Адрес |
Теперь любую подготовленную таблицу можно оформлять в данном формате, нажав назначенную макросу кнопку на панели инструментов.
Задание 3. Создать макрос, проектирующий макет титульного листа. Назначить созданному макросу комбинацию клавиш.
Порядок выполнения:
1. Набрать произвольный заголовок (название работы) в том месте страницы, где он должен стоять на титульном листе, сделать выравнивание – По центру.
2. Начать запись макроса, выполнив команду Сервис- Макрос- Макросы. Введите его имя, например, Титульный_лист. Указать его назначение в поле Описание, например, Создает макет титульного листа.
3. В разделе Назначить макрос нажать кнопку [клавишам].
4. В появившемся окне Настройка активизировать поле Новое сочетание клавиш, затем нажать любое сочетание управляющих клавиш [Ctrl] (или [Alt]) и какую-нибудь алфавитно-цифровую клавишу, например, [Alt+7].
5. Нажать кнопку [Закрыть] и затем [ОК].
6. Выполнить последовательность действий, непосредственно входящих в макрос:
- поместить курсор над набранным текстом (клавиши [Ctrl]+(-)). Установить параметра: выравнивание – По центру, шрифт – 15, Times New Roman, все прописные и ввести текст «МИНИСТЕРСТВО ОБРАЗОВАНИЯ РЕСПУБЛИКИ БЕЛАРУСЬ». Нажать [Enter] и выравнивание – По центру, шрифт - Times New Roman, 13, все прописные, ввести текст «БЕЛОРУССКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ»;
- отступив пару строк, установить выравнивание – По правому краю, шрифт - 15, ввести текст «Кафедра информационных технологий»;
- отступив 5-6 строк, установить выравнивание - По центру, шрифт- 18, малые прописные, набрать текст «Реферат», ниже перед строкой заголовка реферата ввести текст «на тему»: шрифт – 14;
- перейти в конец набранного ранее заголовка с помощью клавиш [Ctrl]+(-);
- отступив 5-6 строк установить выравнивание – По левому краю, шрифт – 15, набрать текст «Выполнил студент»;
- отступив еще 5-6 строк, установить выравнивание – По центру, шрифт – 13, набрать текст «Минск 2008»;
- перейти в конец набранных ранее слов «на тему» с помощью клавиш [Ctrl]+(-) и (-);
- остановить запись макроса, нажав кнопку [Остановить запись] на панели инструментов.
7. Набрать и выделить заголовок (название курсовой работы), к которому будет применяться макрос.
8. Запустить макрос, нажав назначенные клавиши (в данном случае [Alt+7]). На экране появится титульный лист реферата.
1. Мусин К.А «Техническое приложение к Microsoft Word»
2. Бородина А.И «Макропрограммирование»