A Microsoft Word lehetővé teszi a formázás alkalmazásátnagy szövegrészletek elvarázsolják. Az egyetlen bitszövegre alkalmazott formázást átmásolhatja, és néhány kattintással alkalmazhatja a teljes bekezdésekre és szakaszokra. Sajnos ugyanez nem igaz a táblákra. Ha meg akarja változtatni egy adott dokumentum összes táblájának stílusát, akkor mindegyiket külön kell választania, és meg kell változtatnia a stílust. Alternatív megoldás egy makró használata ehhez.
Táblázatstílus keresése
A makró létrehozása előtt meg kell találniaaz alkalmazandó táblázatstílus neve. Ez nagyon könnyű. Nyissa meg a Word dokumentumot, amelyhez meg akarja változtatni a táblázati stílusokat. Kattintson a táblázat belsejére, majd lépjen a Tervezés lapra a Táblázat Eszközök lapon.
Vigye az egérmutatót az összes táblára alkalmazni kívánt asztalstílus fölé, és egy szerszámcsúcs megmutatja, hogy hívják. Jegyezze fel a nevet, és készen áll a makró létrehozására.
Táblázatstílus makró
Engedélyezze a Fejlesztő fület a Wordben a Fájl> Beállítások> Szalag testreszabása menüponttal. Engedélyezze a Fejlesztő eszköztárat, majd térjen vissza a dokumentumhoz.
Kattintson a Fejlesztő lapon a Makró elemre. Adja meg a következő nevet;
ApplyTableStyle
Kattintson a létrehozás elemre, és írja be a következőt a kódbamezőbe azonban szerkesztenie kell ezt a sort: tbl.Style = “Medium Shading 2 - Accent 1”. Cserélje le az idézőjelek belsejében 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 azt.
Sub ApplyTableStyle() Dim tbl As Table For Each tbl In ActiveDocument.Tables tbl.Style = "Medium Shading 2 - Accent 1" Next End Sub
Ennyit kell tenned. Amint a makró fut, automatikusan megváltoztatja az összes tábla stílusát. Ha valaha másféle táblastí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 megadotthoz.
Ha bármikor meg kell változtatnia a makró stílusátvonatkozik, akkor módosítania kell a kódot, és ki kell cserélnie az alkalmazni kívánt stílus nevét. A makró stílusokat alkalmaz a dokumentum összes jelenlegi és új táblájára. Ez nyilvánvalóan könnyebb lenne, ha a Microsoft Word-nek beépített lehetősége lenne erre. Ez furcsának tűnik az alkalmazás számára.
Hozzászólások