Как да промените стила за всички таблици в Microsoft Word

Microsoft Word ви позволява да приложите форматирането къмголеми фрагменти от текстови масиви. Можете да копирате форматирането, приложено към един бит текст, и да го приложите към цели абзаци и раздели само с няколко щраквания. За съжаление, същото не важи за таблиците. Ако искате да промените стила за всички таблици в определен документ, ще трябва да изберете всяка от тях поотделно и да промените стила. Алтернативата е да използвате макрос, за да го направите.

Намерете стила на таблицата

Преди да можете да създадете макроса, трябва да намеритеимето на стила на таблицата, който искате да приложите. Това е доста лесно. Отворете документа на Word, за който искате да промените стиловете на таблицата. Щракнете вътре в таблицата и след това отидете на раздела Дизайн в раздела Инструменти за таблица.

Задръжте курсора на мишката върху стила на таблицата, който искате да приложите към всички таблици, а съветът на инструмента ще ви каже какво се нарича. Запишете името и сте готови да създадете макроса.

Макро стил на таблица

Активирайте раздела за програмисти в Word, като отидете на Файл> Опции> Персонализирайте лентата. Активирайте лентата с инструменти на програмист и след това се върнете към вашия документ.

В раздела Програмист щракнете върху Макроси. Дайте му следното име;

ApplyTableStyle

Щракнете върху създаване и въведете следното в кодаполето обаче, трябва да редактирате този ред: tbl.Style = „Средно засенчване 2 - Акцент 1“. Заменете бита вътре в кавички с името на името на стила на таблицата, който сте копирали в предишната стъпка. Не премахвайте кавичките от кода. Просто въведете името на стила на таблицата и я стартирайте.

Sub ApplyTableStyle()
Dim tbl As Table
For Each tbl In ActiveDocument.Tables
tbl.Style = "Medium Shading 2 - Accent 1"
Next
End Sub

Това е всичко, което трябва да направите. След като макросът се стартира, той автоматично ще промени стила за всички таблици. Ако някога се налага да използвате различен стил на таблица, ще трябва да премахнете този макрос, защото той проактивно променя стила на всички таблици на този, който сте посочили в макроса.

Ако някога трябва да промените кой стил макросаважи, ще трябва да редактирате кода и да замените името на стила, който искате да приложите. Макросът прилага стилове за всички текущи и всички нови таблици в документа. Това очевидно би било по-лесно, ако Microsoft Word имаше вградена опция за това. Изглежда странно недостатък за приложението.