Hur man använder en stil eller VBA för att tilldela precis det utseende du vill ha för alla tabeller i Word

Bild: justplay1412/Shutterstock

Artikeln, Hur man kontrollerar en Word-tabells horisontella justering, visar hur du sparar en formaterad tabell som en snabbtabell i Microsoft Word. Sedan kan du infoga tabellskalet, formatera det och börja mata in data direkt. Ett snabbbord kan spara mycket tid. Men att använda den funktionen är inte det enda sättet att snabbt piska bord i form.

SE: 83 Excel-tips varje användare bör behärska (TechRepublic)

Måste läsa Windows-täckning

I den här artikeln kommer jag att visa dig hur du tillämpar samma stil på alla tabeller i dokumentet, en efter en. Jag ska också visa dig en VBA-procedur som kommer att göra samma sak, men mycket snabbare och med liten ansträngning från din sida.

Jag använder Microsoft 365 på ett Windows 10 64-bitarssystem. (Jag rekommenderar att du inte uppgraderar till Windows 11 förrän alla knep är klara.) Word Online stöder inte något av alternativen som diskuteras i den här artikeln. För din bekvämlighet kan du ladda ner demonstrationsfilerna .docm, .doc och .cls. Om du arbetar med dina egna filer måste du veta hur du infogar och ändrar tabeller, men jag kommer att tillhandahålla många grundläggande instruktioner.

Hur man applicerar en stil på en tabell i Word

Det spelar ingen roll hur det går till, men ofta får du några tabeller med olika format. Du kanske hämtar data från online eller tar emot tabeller från medarbetare. Oavsett hur det händer, vill du förmodligen att alla tabeller ska se likadana ut.

Om du har ett dokument, med bara ett fåtal tabeller som inte matchar, kombinera Words sökfunktion med valfri tabellstil. Du kommer att flytta från tabell till tabell, men det tar inte lång tid eftersom Find hittar tabellerna åt dig och hoppar över allt annat innehåll. Du kan använda inbyggd eller anpassad tabellstil. Båda kommer att finnas tillgängliga i tabellgalleriet.

Låt oss nu gå igenom ett snabbt exempel. Det korta dokumentet som visas i Bild A har tre bord. Formaten och justeringen är olika för alla tre. Med hjälp av Hitta väljer du och formaterar, en efter en. Så det är inte ett bra alternativ för ett stort dokument med många tabeller.

Bild A

Låt oss tillämpa samma stil på alla tre tabellerna.

För att formatera alla tre tabellerna med en stil, gör följande:

1. På fliken Hem klickar du på Redigera och väljer Sök. Om du gör det öppnas navigeringsfönstret.
2. Klicka på rullgardinsmenyn Sök dokument (bredvid förstoringsglasikonen) och välj Tabeller (Bild B).
3. Om du gör det visas två nya ikoner i rutan för att gå framåt och bakåt genom dokumentet.
4. Klicka på nedåtpilen så hittar Word nästa tabell i dokumentet (Bild C). Bli inte förvånad om du måste klicka på den knappen mer än en gång, men du kan se urvalshandtagen när ett bord väljs, så använd det som din guide.
5. Med en tabell markerad klickar du på den kontextuella fliken Tabelldesign och väljer en stil från galleriet Tabellstilar. Jag valde List Table List Colorful (den gröna). Jag klickade helt enkelt på en i galleriet; det spelar ingen roll vilken stil du använder för våra ändamål.
6. När du har tillämpat stilen klickar du på nedåtpilen igen för att välja nästa tabell och tillämpa samma stil från galleriet.

Upprepa det sista steget en gång till och du är klar, som du kan se i Bild D. Om du arbetar med din egen fil kan du behöva upprepa det sista steget mer än en gång.

Bild B

Använd navigeringsfönstret för att hitta tabeller.

Bild C

Klicka på nedåtpilen för att välja nästa tabell; klicka på uppåtpilen för att hitta föregående tabell.

Bild D

Ett par klick formaterar om alla tre tabellerna.

Det var snabbt och enkelt – om du bara har några få bord. Men oj…. Jag applicerade en liknande stil på det andra bordet av en slump! I ett så enkelt dokument kan du snabbt åtgärda det problemet, men det är ett potentiellt problem, så var försiktig.

Om du har olika krav på inslagning eller justering kan du skapa anpassade tabeller och tillämpa den anpassade stilen på samma sätt. Om du har många felaktiga tabeller kommer en VBA-procedur att gå snabbare och förhindra fel. Innan vi går vidare vill du dock stänga demonstrationsfilen utan att spara eller klicka på Ctrl+Z tre gånger för att avformatera tabellerna så att de inte matchar nästa avsnitt.

VBA-proceduren

Det är enkelt att formatera tabeller med VBA – väldigt lite kod krävs. Att veta vilka egenskaper som ska ändras är nyckeln till att det blir rätt. I vårt fall vill vi använda samma stil som vi använde i det förra avsnittet, “Lista Tabell 6 Färgglad” på alla tabeller i ett dokument och det är vad Lista A gör.

Lista A

Sub ApplyListTable6Colorful()

‘Tillämpa inbyggd stil på alla tabeller i dokumentet.

Dim tbl Som Tabell

Vid fel GoTo ErrHandler

För varje tbl I ActiveDocument.Tables

tbl.Style = “Lista Tabell 6 Färgglad – Accent 6”

Nästa

Avsluta Sub

ErrHandler:

MsgBox “Error” & Err.Number & ” ” & Err.Description

Avsluta Sub

Proceduren ställer in ett tabellobjekt och använder For Every-satsen för att bläddra igenom alla tabeller i dokumentet, på samma sätt som den manuella sökfunktionen gör. Uttrycket tbl.Style = “List Table 6 Colorful – Accent 6” tillämpar sedan den stilen på varje tabell.

Stilnamnet måste vara komplett; du kan hitta den genom att hålla muspekaren över miniatyren i galleriet. Även om jag inte har gjort det, kan du lägga till fler format till For Every-satsen. Efter att ha skrivit tbl. VBA kommer att visa en lista över möjliga egenskaper och händelser. Felhanteringen är grundläggande och i ett så enkelt förfarande bör det vara adekvat men var beredd att testa grundligt innan beslutet fattas.

Om du använder en bandversion, se till att spara arbetsboken som en makroaktiverad fil. Om du arbetar i menyversionen kan du hoppa över det här steget.

För att gå in i proceduren, tryck på Alt + F11 för att öppna Visual Basic Editor (VBE). I Project Explorer till vänster, välj ThisDocument. Du kan ange koden manuellt eller importera den nedladdningsbara .cls-filen. Dessutom finns makrot i de nedladdningsbara .docm-, .doc- och .cls-filerna. Om du anger koden manuellt, klistra inte in från den här webbsidan. Kopiera istället koden till en textredigerare och klistra sedan in koden i modulen ThisDocument. Om du gör det tar du bort alla fantomwebbtecken som annars kan orsaka fel.

För att köra koden, gå tillbaka till dokumentet och klicka på fliken Utvecklare. Klicka på Makron i gruppen Makron. Välj ApplyListTable6Colorful från dialogrutan som visas i figur E och klicka sedan på Kör. Resultaten är omedelbara.

Bild E

Kör VBA-proceduren.

Det är dock osannolikt att du kommer att vilja gå igenom den rutinen varje gång, så överväg att lägga till proceduren i Quick Access Toolbar (QAT) eller en anpassad grupp på menyfliksområdet. För instruktioner, läs Hur man lägger till Office-makron i QAT-verktygsfältet för snabb åtkomst.