Cvičenie pre pridanie Visual Basic tabuľky programu Word

Tabuľky sú základným rysom aplikácie Word . Vyskytujú sa u všetkých druhov dokumentov , ktoré pomáhajú používateľom Word vizuálne organizovať dáta . To môže byť časovo náročné vytvárať tabuľky podľa vašich predstáv , ale ak viete niečo o Visual Basic , aplikácie Word skriptovací jazyk , môžete vytvoriť oveľa rýchlejšie , naplnenie a tabuľky vo formáte . Štúdium na nasledujúce Visual Basic program vám náskok v práci s tabuľkami Word prostredníctvom kódu . Zadajte kód pre vytvorenie tabuľky

Sub mac ( ) Dim kde As RangeDim Nutab Ako tabuľke

Set kde = Selection.RangeSet Nutab = ActiveDocument.Tables.Add ( kde , numrows : = 7 , NumColumns : .... = 3 ) Spojené

nuTab.Columns ( 1 ) články ( 1 ) Rozsah = " niektoré veci " nuTab.Columns ( 2 ) bunky ( 2 ) Rozsah = " niektoré ďalšie veci "

nuTab.AutoFormat wdTableFormatClassic1

S nuTab.Columns ( 2 ) . Cells ( 2 ) S. hraníc ( wdBorderTop ) . LineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd WithWith . hranice ( wdBorderBottom ) . LineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd WithEnd S

End Sub ------------------------- ------------- Zadajte zhora uvedený kód v jazyku Visual Basic IDE ( integrované vývojové prostredie ) , ktoré môžete zadať zvnútra Word stlačením Alt - F11 , a zabezpečiť , že ste v okne kódu ( Zobrazenie > Kód ) .

spustite skript návrate do aplikácie Word , voľbou " Developer > Makrá , " výber " mac " zo zoznamu a stlačením tlačidla " Spustiť " . Visual Basic vytvorí novú tabuľku na aktuálnu pozíciu kurzora , pridáva niektoré údaje na nej a formáty jeden z buniek .
Prečítajte si, ako skript funguje

Späť na IDE študovať kód . Príkaz Set kde = Selection.Range definuje premennú predstavujúcu aktuálnu polohu kurzora . To je miesto , kde budete inštalovať nové tabuľky . Druhý riadok ( Set Nutab = ... ) skutočne vytvára tabuľku , pomocou ActiveDocument objektu , aby tak urobili .

Pár príkazov po príkaze Set nuTable pridáva obsah do tabuľky , cez stĺpce a bunky vlastnosti objektu tabuľky .
nájsť objekt Členovia s Prehliadači objektov

Ak máte obavy o to poznať špecifické funkcie a vlastnosti ( napr. Stĺpce , Cells ) objektu , môžete ľahko získať opisný zoznam nimi stlačením klávesy F2 , ktorá volá do prehliadača objektov . Do vyhľadávacieho poľa objektu prehliadača , môžete zadať termín " tabuľky " a stlačte " Enter " , vyberte " tabuľka " v table výsledkov vpravo a dostanete zoznam všetkých členov tabuľke .

Po návrate do kódu , nájdete v prehlásení " S nuTab.Columns ( 2 ) . bunky ... " S Kĺúčové slovo hovorí , Visual Basic , ktoré nechcete písať dlho reťazec bodkovaného slov opakovane odkazovať na objekt je metóda alebo vlastnosť ( napr. Object1.Object2.Object3.doThis ( ) ) . Miesto , ktoré chcete priblížiť priamo na príslušníkov určitého objektu v reťazci . Napríklad :

S Object1.Object2.Object3.doThis ( ) End With
použiť formátovanie

vyhlásenie nuTab.AutoFormat ... platí režim na hraniciach s kompletnou tabuľky , pričom prvý s vyhlásením začne formátovať jednotlivé bunky . Formátovanie kódu je použitie nie je špecifické pre bunky tabuľky , ale môže pracovať s akýmkoľvek objektom Range . V nuTab.Columns ( 2 ) . Cells ( 2 ) , objekt sa stane , že je rozsah objektu v tomto prípade .

Experimentujte s rôznymi možnosťami formátovania , ktoré Word ponúka . Pomocou prehliadača objektov je nájsť . Začnite s hľadaním známy voľby ( napr. wdLineStyleSingle ) , a všimol si zbierku podobné možnosti , ktorých je súčasťou .

• Predchádzajúca strana: Ako vypočítať Priestupný rok s Microsoft Visual Basic 
• Ďalšia strana: Visual Basic Projects