Tabeller er en viktig funksjon i Word. De vises i alle typer dokumenter for å hjelpe Word-brukere visuelt organisere data . Det kan være tidkrevende å lage tabeller til din smak, men hvis du vet noe om Visual Basic, Word skriptspråk , kan du raskere opprette, fylle og formatere tabeller. Studerer følgende Visual Basic program vil gi deg et forsprang i å manipulere Word tabeller gjennom koden . Type koden for å lage en tabell

Sub mac ( ) Dim der Som RangeDim nuTab Som tabell

Set der = Selection.RangeSet nuTab = ActiveDocument.Tables.Add (der , NumRows : = 7 , NumColumns : . . . . = 3 )

nuTab.Columns ( 1 ) Cells ( 1 ) treet = " noen ting" nuTab.Columns ( 2 ) Cells ( 2 ) Range = " noen flere ting "

nuTab.AutoFormat wdTableFormatClassic1
p Med nuTab.Columns ( 2 ) . Cells ( 2) Med . Borders ( wdBorderTop ) . lineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd WithWith . Borders ( wdBorderBottom ) . lineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd WithEnd Med

End Sub ------------------------- ------------- Angi foregående koden i Visual Basic IDE (integrert utviklingsmiljø ) , som du kan skrive fra innsiden Word ved å trykke alt - F11 , og sikre at du er i koden vindu ( Vis > Code).

Kjør skriptet ved å returnere til Word , velge " Utvikler > makroer ," velge " mac " fra listen , og trykke på "Kjør". Visual Basic oppretter en ny tabell med gjeldende innsettingspunktet , legger noen data til det og formater en av cellene .
Finn ut hvordan Script anlegg

Tilbake til IDE til å studere koden . Uttalelsen ligger der = Selection.Range definerer en variabel som representerer den nåværende plasseringen av markøren. Det er der du skal installere en ny tabell . Den andre linjen (sett nuTab = ... ) skaper faktisk bordet, bruker ActiveDocument objektet å gjøre det.

Par uttalelser etter den Set nuTable uttalelse legger innhold til tabellene , gjennom kolonner og celler egenskapene til Table objektet .
bilder Finn Object Medlemmer med Object Browser
p Hvis du er bekymret for ikke å kjenne de spesifikke funksjoner og egenskaper (f.eks kolonner , celler) av et objekt , kan du lett få en beskrivende liste over dem ved å trykke F2 , som kaller opp objektet nettleser. I søkeboksen av objektet nettleseren , kan du gå inn i begrepet "Tabeller" og trykk "Enter ", velg " Table" i resultatene ruten til høyre , og få en liste over alle medlemmene i Table.
< p> Tilbake til koden finner du i utsagnet " Med nuTab.Columns ( 2 ) . Cells ... " Den Med søkeordet forteller Visual Basic som du ikke ønsker å skrive ut en lang streng av prikkete ord å gjentatte ganger refererer til et objekt metode eller eiendom (f.eks Object1.Object2.Object3.doThis ( ) ) . I stedet , du vil zoome rett inn på medlemmer av et bestemt objekt i kjeden. For eksempel : en p Med Object1.Object2.Object3.doThis ( ) End With
bruke formatering

Uttalelsen nuTab.AutoFormat ... gjelder en grense ordningen til hele tabellen , mens den første med uttalelsen begynner å formatere en enkelt celle . Formateringen koden søker er ikke spesifikke for tabellceller , men kan fungere med alle Range objekt. De nuTab.Columns ( 2 ) . Cells ( 2 ) objekt skjer for å være Range objekt i dette tilfellet .

Eksperimenter med forskjellige formateringsalternativer som Word tilbyr. Bruk Object Browser for å finne dem . Begynn med å søke en kjent alternativ ( f.eks wdLineStyleSingle ) , og legge merke til innsamling av lignende alternativer som det er en del .