Разработка макрокоманд

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

1. Создать файл, в который будет копироваться абзац, ввести несколько строк текста, сохранить и закрыть.

2. Задать стартовые условия: создать новый файл и ввести абзац текста.

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

4. Записать следующую последовательность действий:

- выделение текущего абзаца (четырехкратным нажатием клавиши F8);

- копирование выделенного фрагмента в буфер обмена (Ctrl + C);

- открытие файла, в который надо вставить абзац;

- переход в конец файла (Ctrl + End);

- вставка фрагмента из буфера обмена (Ctrl + V);

- сохранение файла;

- закрытие файла;

- снятие выделения в исходном файле (Esc, затем любая клавиша со стрелкой).

5. Остановить запись.

6. Сохранить файл в формате Документ Word с поддержкой макросов.

7. Опробовать запуск макроса тремя способами:

- через окно Макросы;

- с помощью кнопки на панели быстрого доступа;

- с помощью назначенного сочетания клавиш.

II. Создать макрос для удаления из текста лишних пробелов. Использовать для этого операцию поиска и замены. В диалоговом окне команды Заменить сделать следующие установки:

- в строке Найти ввести пробел, затем выражение {2;} (что означает пробел, повторенный не менее двух раз; см. справку о подстановочных знаках);

- в строке Заменить ввести пробел;

- включить режим Подстановочные знаки;

После установки параметров поиска и замены щелкнуть по кнопке Заменить все.

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

III. Создать макрос для удаления пробелов перед знаками препинания. Использовать для этого операцию поиска и замены. В диалоговом окне команды Заменить сделать следующие установки:

- в строке Найти ввести пробел, затем выражение {1;}([.,:;\!\?]) (что означает один и более расположенных подряд пробелов, стоящих перед любым из перечисленных в квадратных скобках символов);

- в строке Заменить ввести выражение: \1 (здесь 1 – порядковый номер выражения, заключенного в круглые скобки в поле Найти);

- включить режим Подстановочные знаки;

После установки параметров поиска и замены щелкнуть по кнопке Заменить все.

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

IV. Создать макрос для оформления в соответствии с требованиями редактора Word текста, преобразованного из другого формата.

Исходный текст имеет следующие особенности форматирования:

1. Абзацный отступ формируется с помощью пробелов.

2. Каждая строка завершается знаком конца абзаца.

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

Для устранения этих недостатков необходимо:

1. Удалить знаки конца абзаца в конце строк, оставив их только в конце абзацев.

2. Удалить лишние пробелы.

3. Установить абзацные отступы.

Последовательность действий макроса:

1. Выявить в тексте места, где должны остаться знаки конца абзаца, и временно заменить их каким-нибудь другим символом. Признаком таких мест являются идущие подряд несколько пробелов после знака конца абзаца. Использовать для этого операцию поиска и замены. В диалоговом окне команды Заменить сделать следующие установки:

- в строке Найти ввести выражение: ^13 {2;} (что означает два или более расположенных подряд пробелов, следующих за знаком конца абзаца; см. справку о кодах специальных символов);

- в строке Заменить ввести любой символ, не встречающийся в тексте, например, $;

- включить режим Подстановочные знаки;

После установки параметров поиска и замены щелкнуть по кнопке Заменить все.

2. Все оставшиеся знаки конца абзаца заменить символом пробела. Для этого в окне поиска и замены в поле Найти ввести код ^13, в поле Заменить – пробел, включить режим Подстановочные знаки, щелкнуть по кнопке Заменить все.

3. Восстановить знаки конца абзаца в тех местах, где они нужны. Для этого в окне поиска и замены в поле Найти ввести символ, на который были временно заменены знаки конца абзаца, в поле Заменить – код ^p (см. справку о подстановочных знаках), включить режим Подстановочные знаки, щелкнуть по кнопке Заменить все.

4. Запустить макрос для удаления лишних пробелов.

5. Выделить весь текст (пятикратным нажатием клавиши F8).

6. Назначить абзацные отступы в диалоговом окне Абзац.

7. Снять выделение с текста (Esc, затем любая клавиша со стрелкой).

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

практикум по дисциплине «Информационные технологии в экономике». текстовый редактор word 2007

Составители: АНТОНЕНКОВА Альбина Викторовна

степанова Марина Георгиевна

Редактор

Подписано в печать. Формат 60х84 1/16.

Печать офсетная. Усл. печ. л..

Уч.-изд. л.. Тираж 200 экз. Заказ.