Tabeller er et væsentligt element i Word. De optræder i alle slags dokumenter for at hjælpe Word brugere visuelt at organisere data. Det kan være tidskrævende at oprette tabeller til din smag, men hvis du ved noget om Visual Basic, Word scripting sprog, kan du hurtigere oprette, udfylde og formatere tabeller. Studere den følgende Visual Basic-program vil give dig et forspring i at manipulere Word tabeller gennem kode . Typekode at oprette en tabel
Sub mac ( ) Dim hvor As RangeDim nuTab Som tabel
Set hvor = Selection.RangeSet nuTab = ActiveDocument.Tables.Add (hvor NumRows : = 7 , NumColumns : . . . . = 3) Salg
nuTab.Columns (1) Celler (1) Range = " nogle ting " nuTab.Columns (2) Celler (2) Range = " nogle flere ting "
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
End Sub ------------------------- ------------- Indtast ovenstående kode i Visual Basic IDE ( integreret udviklingsmiljø ) , hvor du kan indtaste indefra Word ved at trykke alt - F11 og sikre at du er i koden vinduet (Vis> Code) .
Kør scriptet ved at vende tilbage til Word , vælge "Udvikler > Makroer ," vælge " mac " fra listen og trykke på " Run". Visual Basic opretter en ny tabel på det aktuelle indsætningspunktet , tilføjer nogle data til det og formater en af cellerne .
Lær Hvordan Script arbejder
Retur til IDE til at studere koden . Erklæringen , hvor = Selection.Range definerer en variabel , der repræsenterer den aktuelle placering af markøren. Dette er, hvor du installerer en ny tabel . Den anden linie (sæt nuTab = ... ) faktisk skaber bordet, ved hjælp af ActiveDocument objekt til at gøre det . Nær
par udsagn efter Set nuTable erklæring tilføjer indhold til tabellerne , gennem søjlerne og Celler egenskaber Table objektet .