Как изменить стиль для всех таблиц в Microsoft Word

Microsoft Word позволяет применять форматирование к большим фрагментам текста целиком. Вы можете скопировать форматирование, примененное к одному фрагменту текста, и применить его ко всем абзацам и разделам всего несколькими щелчками мыши. К сожалению, то же самое не относится к таблицам. Если вы хотите изменить стиль для всех таблиц в конкретном документе, вам придется выбрать каждую отдельно и изменить стиль. Альтернативой является использование макроса для этого.

Найти стиль таблицы

Прежде чем вы сможете создать макрос, вам нужно найти имя стиля таблицы, который вы хотите применить. Это довольно легко. Откройте документ Word, для которого вы хотите изменить стили таблиц. Щелкните внутри таблицы, а затем перейдите на вкладку «Дизайн» на вкладке «Инструменты для таблиц».

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

Макрос стиля таблицы

Включите вкладку «Разработчик» в Word, выбрав «Файл»> «Параметры»> «Настроить ленту». Включите панель инструментов разработчика, а затем вернитесь к документу.

На вкладке «Разработчик» нажмите «Макросы». Дайте ему следующее имя;

Применитьтабличный стиль

Нажмите «Создать» и введите следующее в поле кода, однако вам нужно отредактировать эту строку: tbl.Style = «Среднее затенение 2 — Акцент 1». Замените бит внутри кавычек на имя стиля таблицы, скопированного на предыдущем шаге. Не удаляйте кавычки из кода. Просто введите имя стиля таблицы и запустите его.

Sub ApplyTableStyle() Dim tbl As Table For Each tbl In ActiveDocument.Tables tbl.Style = «Среднее затенение 2 — Акцент 1» Next End Sub

Это все, что вам нужно сделать. После запуска макроса он автоматически изменит стиль для всех таблиц. Если вам когда-нибудь понадобится использовать другой стиль таблицы , вам нужно будет удалить этот макрос, потому что он заблаговременно изменяет стиль всех таблиц на тот, который вы указали в макросе.

Если вам когда-нибудь понадобится изменить стиль, к которому применяется макрос, вам нужно будет отредактировать код и заменить имя стиля, который вы хотите применить. Макрос применяет стили ко всем текущим и всем новым таблицам в документе. Это, очевидно, было бы проще, если бы в Microsoft Word была встроенная опция для этого. Это кажется странным недостатком для приложения.