Jak zmienić styl dla wszystkich tabel w programie Microsoft Word

Program Microsoft Word umożliwia zastosowanie formatowania do dużych fragmentów tekstu masowo. Możesz skopiować formatowanie zastosowane do jednego fragmentu tekstu i zastosować je do całych akapitów i sekcji za pomocą zaledwie kilku kliknięć. Niestety, to samo nie dotyczy tabel. Jeśli chcesz zmienić styl dla wszystkich tabel w określonym dokumencie, musisz wybrać każdą z nich osobno i zmienić styl. Alternatywą jest użycie do tego makra.

Znajdź styl tabeli

Zanim utworzysz makro, musisz znaleźć nazwę stylu tabeli, który chcesz zastosować. To jest całkiem łatwe. Otwórz dokument programu Word, dla którego chcesz zmienić style tabeli. Kliknij wewnątrz tabeli, a następnie przejdź do karty Projektowanie na karcie Narzędzia tabel.

Najedź kursorem myszy na styl tabeli, który chcesz zastosować do wszystkich tabel, a podpowiedź powie Ci, jak się nazywa. Zanotuj nazwę i możesz przystąpić do tworzenia makra.

Makro w stylu tabeli

Włącz kartę Deweloper w programie Word, przechodząc do Plik>Opcje>Dostosuj wstążkę. Włącz pasek narzędzi programisty, a następnie wróć do swojego dokumentu.

Na karcie Deweloper kliknij opcję Makra. Nadaj mu następującą nazwę;

Zastosuj styl tabeli

Kliknij Utwórz i wprowadź następujący kod w polu kodu, jednak musisz edytować ten wiersz: tbl.Style = „Medium Shading 2 – Accent 1”. Zastąp bit w cudzysłowach nazwą stylu tabeli, który skopiowałeś w poprzednim kroku. Nie usuwaj cudzysłowów z kodu. Po prostu wprowadź nazwę stylu tabeli i uruchom go.

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

To wszystko, co musisz zrobić. Po uruchomieniu makra automatycznie zmieni styl dla wszystkich tabel. Jeśli kiedykolwiek będziesz musiał użyć innego stylu tabeli , będziesz musiał usunąć to makro, ponieważ proaktywnie zmienia ono styl wszystkich tabel na określony w makrze.

Jeśli kiedykolwiek będziesz musiał zmienić styl stosowany przez makro, będziesz musiał edytować kod i zastąpić nazwę stylu, który chcesz zastosować. Makro stosuje style do wszystkich bieżących i wszystkich nowych tabel w dokumencie. Byłoby to oczywiście łatwiejsze, gdyby Microsoft Word miał wbudowaną opcję, aby to zrobić. Wydaje się, że jest to dziwna wada aplikacji.