Tabeller är ett väsentligt inslag i Word . De förekommer i alla typer av dokument för att hjälpa Word-användare visuellt organisera data . Det kan vara tidskrävande att skapa tabeller för att passa dig , men om du vet något om Visual Basic , Word skriptspråk , kan du snabbare skapa , fylla och formatera tabeller . Studera följande Visual Basic -programmet kommer att ge dig ett försprång i att manipulera Word-tabeller genom kod . Skriv kod för att skapa en tabell
Sub mac ( ) Dim där As RangeDim nuTab Som tabell
uppsättning där = Selection.RangeSet nuTab = ActiveDocument.Tables.Add ( där NumRows : = 7 , NumColumns : . . . . = 3 ) katalog
nuTab.Columns ( 1 ) Cells ( 1 ) Intervall = " vissa saker" nuTab.Columns ( 2 ) Celler ( 2 ) Intervall = " lite mer grejer "
nuTab.AutoFormat wdTableFormatClassic1
Med nuTab.Columns ( 2 ) . Celler ( 2 ) Med . gränser ( wdBorderTop ) . lineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd WithWith . gränser ( wdBorderBottom ) . LineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd WithEnd Med
Sub
End ------------------------- ------------- Ange ovanstående kod i Visual Basic IDE ( integrerad utvecklingsmiljö ) , där du kan ange inifrån Word genom att trycka på alt - F11 , och se till att du är i koden fönstret ( Visa> Kod ) .
Kör skriptet genom att återvända till Word , markera " Utvecklare > Makron , " välja " mac " i listan och trycka på " Kör". Visual Basic skapar en ny tabell i den aktuella insättningspunkten , adderar några uppgifter till den och format en av cellerna .
Lär dig hur den Script fungerar
tillbaka till IDE för att studera koden . Uttalandet ligger där = Selection.Range definierar en variabel som representerar den aktuella platsen för markören . Det är där du installerar ett nytt bord . Den andra raden ( Set nuTab = ... ) skapar faktiskt bordet , med ActiveDocument objektet att göra så .
Par uttalanden efter Set nuTable uttalande tillägger innehåll till borden , genom kolonnerna och celler egenskaper Table objektet . Addera ditt Hitta objekt Medlemmar med Object Browser
p Om du är orolig för att inte veta de specifika funktioner och egenskaper (t.ex. kolumner , celler) av ett objekt , kan du enkelt få en beskrivande förteckning över dem genom att trycka på F2 , som ringer upp objektet webbläsare . I sökrutan av objektet webbläsare , kan du skriva in termen "Tabeller" och tryck på " Enter ", välj " Tabell " i resultaten rutan till höger , och få en lista på alla medlemmar i tabell .
Återvänder till koden , hänvisa till uttalandet " med nuTab.Columns ( 2 ) . Celler ... " Den Med nyckelordet berättar Visual Basic som du inte vill skriva ut en lång sträng av prickiga ord att upprepade gånger hänvisa till ett objekts metod eller egendom ( t.ex. Object1.Object2.Object3.doThis ( ) ) . Istället vill du zooma direkt in på medlemmarna i ett visst objekt i kedjan . Till exempel :
Object1.Object2.Object3.doThis ( ) End With
tillämpar formatering
Uttalandet nuTab.AutoFormat ... tillämpar en gräns system för hela tabellen , medan den första med uttalandet börjar formatera en enskild cell . Formateringen din kod tillämpar är inte specifik för tabellceller , men kan fungera med någon objektet Range . De nuTab.Columns ( 2 ) . Cells ( 2 ) objektet råkar vara objektet Range i det här fallet .
Experimentera med olika formateringsalternativ som Word erbjuder . Använd Object Browser för att hitta dem . Börja med att söka ett känt alternativ ( t.ex. wdLineStyleSingle ) , och märker insamling av liknande alternativ som den är en del .
