A Microsoft Word lehetővé teszi a formázás alkalmazását nagy szövegrészletekre. Néhány kattintással átmásolhatja a szöveg egy bitjére alkalmazott formázást, és egész bekezdésekre és szakaszokra alkalmazhatja. Sajnos ez nem igaz az asztalokra. Ha meg szeretné változtatni egy adott dokumentum összes táblázatának stílusát, mindegyiket külön kell kiválasztania, és módosítania kell a stílust. Alternatív megoldásként makrót használunk ehhez.
Keresse meg az asztalstílust
A makró létrehozása előtt meg kell találnia az alkalmazni kívánt táblázatstílus nevét. Ez elég könnyű. Nyissa meg azt a Word-dokumentumot, amelynek táblázatstílusait módosítani szeretné. Kattintson a táblázat belsejébe, majd lépjen a Tervezés lapra a Táblázateszközök lapon.
Vigye az egérmutatót az összes táblára alkalmazni kívánt táblázatstílus fölé, és egy eszköztipp megmondja, mi a neve. Jegyezze fel a nevet, és készen áll a makró létrehozására.
Táblázat stílusú makró
Engedélyezze a Fejlesztő lapot a Wordben a Fájl> Beállítások> Szalag testreszabása menüpontjában. Engedélyezze a Fejlesztői eszköztárat, majd térjen vissza a dokumentumhoz.
A Fejlesztő lapon kattintson a Makrók elemre. Adja meg a következő nevet;
ApplyTableStyle
Kattintson a Létrehozás gombra, és írja be a következőket a kódmezőbe, azonban módosítania kell ezt a sort: tbl.Style = „Medium Shading 2 – Accent 1”. Cserélje ki az idézőjelben lévő bitet az előző lépésben másolt táblázatstílus nevére. Ne távolítsa el az idézőjeleket a kódból. Egyszerűen írja be a táblázatstílus nevét, és futtassa.
Sub ApplyTableStyle() Dim tbl As Table For Each tbl In ActiveDocument.Tables tbl.Style = "Medium Shading 2 - Accent 1" Next End Sub
Csak ennyit kell tennie. Amint a makró lefut, automatikusan megváltoztatja az összes tábla stílusát. Ha valaha is más táblázatstílust kell használnia, akkor el kell távolítania ezt a makrót, mert proaktívan megváltoztatja az összes tábla stílusát a makróban megadott stílusra.
Ha bármikor módosítania kell a makró alkalmazási stílusát, módosítania kell a kódot, és le kell cserélnie az alkalmazni kívánt stílus nevét. A makró stílusokat alkalmaz a dokumentum összes jelenlegi és minden új táblájára. Ez nyilvánvalóan könnyebb lenne, ha a Microsoft Word beépített opcióval rendelkezne erre. Furcsa hiányosságnak tűnik az alkalmazásban.