Jak změnit styl pro všechny tabulky v aplikaci Microsoft Word
Aplikace Microsoft Word umožňuje použít formátování na velké úryvky textu. Můžete zkopírovat formátování použité na jeden kousek textu a použít jej na celé odstavce a oddíly pomocí pouhých několika kliknutí. Totéž bohužel neplatí pro stoly. Pokud chcete změnit styl pro všechny tabulky v konkrétním dokumentu, budete muset vybrat každou zvlášť a změnit styl. Alternativou je použít k tomu makro.
Najít styl tabulky
Než budete moci vytvořit makro, musíte najít název stylu tabulky, který chcete použít. To je docela snadné. Otevřete dokument aplikace Word, pro který chcete změnit styly tabulky. Klikněte do tabulky a poté přejděte na kartu Návrh na kartě Nástroje tabulky.
Najeďte kurzorem myši na styl tabulky, který chcete použít na všechny tabulky, a tip nástroje vám řekne, jak se tento styl nazývá. Poznamenejte si název a jste připraveni vytvořit makro.
Makro ve stylu tabulky
Povolte kartu Vývojář ve Wordu tak, že přejdete na Soubor > Možnosti > Přizpůsobit pás karet. Povolte panel nástrojů Vývojář a poté se vraťte do dokumentu.
Na kartě Vývojář klikněte na Makra. Dejte mu následující název;
ApplyTableStyle
Klikněte na vytvořit a do pole kódu zadejte následující, ale tento řádek musíte upravit: tbl.Style = “Střední stínování 2 – Zvýraznění 1”. Nahraďte bit uvnitř uvozovek názvem názvu stylu tabulky, který jste zkopírovali v předchozím kroku. Neodstraňujte uvozovky z kódu. Jednoduše zadejte název stylu tabulky a spusťte jej.
Sub ApplyTableStyle() Dim tbl As Table For Each tbl In ActiveDocument.Tables tbl.Style = "Medium Shading 2 - Accent 1" Next End Sub
To je vše, co musíte udělat. Jakmile se makro spustí, automaticky změní styl pro všechny tabulky. Pokud někdy budete potřebovat použít jiný styl tabulky, budete muset toto makro odstranit, protože proaktivně změní styl všech tabulek na ten, který jste určili v makru.
Pokud někdy budete potřebovat změnit styl, který makro použije, budete muset upravit kód a nahradit název stylu, který chcete použít. Makro aplikuje styly na všechny aktuální a všechny nové tabulky v dokumentu. To by samozřejmě bylo jednodušší, kdyby měl Microsoft Word vestavěnou možnost to udělat. Vypadá to jako zvláštní nedostatek aplikace.