Макрос word форматирование текста
Вы также можете использовать макросы для вставки стандартного текста, изменения макета страницы, вставки верхнего или нижнего колонтитула, добавления номеров страниц и дат, вставки предварительно отформатированной таблицы или практически любой задачи, которую вы выполняете на регулярной основе. Создавая макрос (будь то Word 2003 или Word 2007) на основе повторяющейся задачи, у вас есть возможность выполнить задачу одним нажатием кнопки или сочетанием клавиш.
Планируй свой макрос
Первым шагом в создании макроса является выполнение шагов, предшествующих записи макроса. Поскольку каждый шаг записан в макросе, вы должны избегать использования Отменить или ошибок записи и опечаток. Выполните задачу несколько раз, чтобы убедиться, что у вас есть свежая мысль. Если вы допустили ошибку во время записи, вам нужно будет начать все сначала.
Начни свой макрос
Назовите свой макрос
Введите имя макроса в поле Имя макроса . Имя не может содержать пробелы или специальные символы.
Назначить сочетание клавиш для макроса
Будьте осторожны при выборе сочетания клавиш, чтобы не перезаписывать сочетания клавиш по умолчанию.
Поместите свой макрос на панель быстрого доступа
Чтобы запустить макрос с помощью кнопки на панели быстрого доступа, нажмите Кнопка .
Выберите Normal.NewMacros.MactoName и нажмите Добавить , затем нажмите ОК .
Запишите свой макрос
После применения макроса к сочетанию клавиш или к панели быстрого доступа к указателю мыши будет прикреплена кассета. Это означает, что каждый сделанный вами щелчок и любой набранный вами текст записываются. Запустите процесс, который вы репетировали на первом шаге.
Остановите запись вашего макроса
После того, как вы выполнили необходимые шаги, вам нужно сообщить Word, что вы закончили запись. Для этого выберите Остановить запись с помощью кнопки «Макросы» на вкладке «Вид» или нажмите Остановить запись в строке состояния.
Если вы не видите кнопку «Остановить запись» в строке состояния, вам нужно будет добавить ее после остановки записи макроса.
1. Щелкните правой кнопкой мыши строку состояния в нижней части экрана Word.
2. Выберите Запись макроса . Отображается красная кнопка остановки записи.
Используйте свой макрос
Нажмите назначенное сочетание клавиш или нажмите кнопку Макрос на панели быстрого запуска.
Если вы решили не назначать макросу комбинацию клавиш или кнопку, выберите Просмотр макросов из кнопки «Макросы» на вкладке «Просмотр».
Выберите макрос и нажмите Выполнить .
Повторите вышеуказанные шаги, чтобы запустить макрос в любом документе Word. Вспомните, как легко создавать макросы в любое время, когда вы выполняете повторяющуюся задачу.
Visual Basic for Applications (VBA, Visual Basic для приложений) — немного упрощённая реализация языка программирования Visual Basic, встроенная в линейку продуктов Microsoft Office.
С помощью этого языка можно легко упростить монотонный набор действий, выполнение которых занимает много времени.
Например, можно автоматизировать обработку содержимого ячеек в Excel или ускорить исправление ошибок оформления документов в Word. Написание макросов для Excel пользуется популярностью у продвинутых пользователей Microsoft Office. Кому-то удается научиться этому самостоятельно, а кто-то записывается на курсы Excel в Алматы или в своем городе.
Созданные программы на языке VBA называются макросами.
Попробуем создать простой макрос обработки текста в Word.
Для начала стоит понять какая последовательность действий прописывается в макрос с помощью макрорекордера (инструмент для записи ваших действий с помощью кода VBA).
Для примера найдем все точки в тексте и заменим их на запятые. Заходим на вкладку Разработчик -> Код -> Запись макроса.
Теперь перейдем на вкладку Главная -> Редактирование -> Заменить. Вводим «.» в поле Найти и «,» в поле Заменить на. Жмем Заменить все.
Теперь останавливаем запись макрорекордера командой Разработчик -> Код -> Остановить запись.
Это все! Ваш первый макрос готов. Давайте же посмотрим на него. Заходим Разработчик -> Код -> Visual Basic. В окне редактирования кода появится такая штука:
Постановка задачи. На основе этого кода создать более функциональный макрос. Пусть он будет проводить поиск и замену пробелов возле точек, запятых, новых строк, скобок и заменять несколько подряд стоящих пробелов на один.
Для этого будут использоваться регулярные выражения (конструкции для поиска и осуществления манипуляций с подстроками в тексте, основанные на использовании метасимволов).
Для поискомого и заменяемого текста в макросе используются следующие строки
Использованные конструкции регулярных выражений приведены в таблице.
Теперь необходимо все это оформить в компактном виде. Для этого удобно создать пару массивов и загнать все в цикл.
В итоге получим:
Полученный макрос сохраняем вместе с документом. Вызвать макрос можно из меню Разработчик или с помощью назначенной комбинации горячих клавиш (Файл -> Параметры -> Настройка ленты -> Сочетания клавиш: Настройка…)
В этом разделе Visual Basic примеры, связанные с задачами, которые определены в следующих разделах.
Сведения о других задачах редактирования и примеры из них см. в следующих темах:
Определение выбора текста
Обрушение выбора или диапазона
Используйте метод Collapse, чтобы свернуть объект Selection или объект Range до его точки начала или окончания. В следующем примере выбор сводится к точке вставки в начале выбора.
В следующем примере диапазон отменяется до точки окончания (после первого слова) и добавляется новый текст.
Расширение выбора или диапазона
В следующем примере используется MoveEnd].. /.. /.. /api/Word.Selection.MoveEnd.md) метод объекта Selection, чтобы расширить конец выбора, чтобы включить три дополнительных слова. MoveLeft, * MoveRight].. /.. /.. /api/Word.Selection.MoveRight.md), ** MoveUp](.. /.. /.. /api/Word.Selection.MoveUp.md) и **Down также можно использовать для расширения объекта иона **Se.
В следующем примере используется MoveEnd].. /.. /.. /api/Word.Range.MoveEnd.md) метод объекта Range для расширения диапазона, чтобы включить первые три абзаца в активный документ.
Переопределение выбора или диапазона
Используйте метод GetRange для переопределения существующего объекта Selection или объекта Range. Дополнительные сведения см. в дополнительных сведениях "Работа с объектом Selection" или "Работа с объектами Диапазона".
Изменение текста
Можно изменить существующий текст, изменив содержимое диапазона. Следующая инструкция изменяет первое слово в активном документе, установив Текст].. /.. /.. /api/Word.Range.Text.md) свойства объекта nge на "The".
Вы также можете использовать метод Delete, объект Selection или объект Range для удаления существующего текста, а затем вставить новый текст с помощью метода InsertAfter или метода InertBefore. В следующем примере удаляется первый абзац в активном документе и вставляется новый текст.
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Поиск и замена выставлены объектами Поиска и Замены. Объект Find доступен в объекте Selection и объекте Range. Действие поиска немного отличается в зависимости от того, имеется ли доступ к объекту Find из объекта Selection или объекта Range.
Поиск текста и его выбор
Если объект Find имеет доступ к объекту Selection, выбор меняется при обнаружении критериев поиска. В следующем примере выбирается следующее появление слова "Hello". Если конец документа достигнут до того, как будет найдено слово "Hello", поиск будет остановлен.
Объект Find содержит свойства, которые относятся к параметрам в диалоговом окне Найти и заменить. Можно установить отдельные свойства объекта Find или использовать аргументы с методом Execute, как показано в следующем примере.
Поиск текста без изменения выбора
Если объект Find имеет доступ к объекту Range, выбор не меняется, но диапазон переопределяется при обнаружении критериев поиска. В следующем примере обнаруживается первое появление слова "синий" в активном документе. Если операция поиска будет успешной, диапазон будет переопределяться и к слову "синий" применяется смелый форматирование.
В следующем примере выполняется тот же результат, что и в предыдущем примере, с использованием аргументов метода Execute.
Использование объекта Replacement
Объект Replacement представляет критерии замены для операции поиска и замены. Свойства и методы объекта Replacement соответствуют параметрам в диалоговом окне Найти и заменить (Изменить меню).
Объект Replacement доступен в объекте Find. В следующем примере все вхождения слова "привет" заменяется на "hello". Выбор изменяется при обнаружении критериев поиска, так как объект Find имеет доступ к объекту Selection.
В следующем примере удаляется жирный форматирование в активном документе. Свойство Bold — true для объекта Find и False для объекта Replacement. Чтобы найти и заменить форматирование, установите поиск и замените текст пустыми строками ("") и установите аргумент Format метода Execute к True. Выбор остается неизменным, так как объект Find имеет доступ к объекту Range (свойство Content возвращает объект Range).
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Читайте также: