Le tabelle sono un elemento essenziale di Word . Essi appaiono in tutti i tipi di documenti per aiutare gli utenti di Word organizzare visivamente i dati . Si può richiedere molto tempo per creare le tabelle a proprio piacimento , ma se si sa qualcosa su Visual Basic , linguaggio di scripting di Word , è possibile creare in modo più rapido , popolare e formattare le tabelle . Studiare il seguente programma Visual Basic vi darà un vantaggio iniziale nel manipolare tabelle di Word tramite il codice. Tipo di codice per creare una tabella

Sub mac ( ) Dim dove come RangeDim nuTab Come Table

dove = Selection.RangeSet nuTab = ActiveDocument.Tables.Add ( dove , numrows : = 7 , NumColumns : . . . . = 3)

nuTab.Columns ( 1 ) cellule ( 1 ) intervallo = nuTab.Columns " alcune cose " (2) cellule ( 2) Gamma = " un po 'di roba "

nuTab.AutoFormat wdTableFormatClassic1

Con nuTab.Columns ( 2 ) . Cells ( 2) Con . Borders ( wdBorderTop ) . LineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd withwith . frontiere ( wdBorderBottom ) . LineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd WithEnd Con

End Sub ------------------------- ------------- inserire il codice sopra in Visual Basic IDE ( ambiente di sviluppo integrato ), che è possibile inserire all'interno di Word premendo ALT - F11 , e assicurando che sei nella finestra del codice ( Visualizza> Codice ) .

Eseguire lo script con il ritorno a Word , selezionando "sviluppatore > Macro ," Selezione "mac " dalla lista e premere "Esegui ". Visual Basic crea una nuova tabella nel punto di inserimento corrente , aggiunge un po 'di dati su di esso e formati di una delle celle .
Imparare lo script funziona

Categoria IDE per studiare il codice . L' istruzione SET dove = Selection.Range definisce una variabile che rappresenta la posizione corrente del cursore . Questo è dove si sta installando una nuova tabella . La seconda linea (Set nuTab = ... ) crea effettivamente la tabella , utilizzando l'oggetto ActiveDocument di farlo.

La coppia di istruzioni che seguono la dichiarazione nuTable Set aggiunge contenuti ai tavoli, attraverso le colonne e celle proprietà dell'oggetto Table .
NGO Trovi Membri dell'oggetto con il Visualizzatore oggetti

Se siete preoccupati di non sapere le funzioni e le proprietà (ad esempio colonne specifiche , celle) di un oggetto , si può facilmente ottenere un elenco descrittivo di loro premendo F2 , che richiama il browser degli oggetti . Nella casella di ricerca del browser degli oggetti , è possibile inserire il termine " Tabelle" e premere "Invio ", selezionare " Table" nel riquadro dei risultati a destra , e ottenere un elenco di tutti i membri della Tavola .

Tornando al codice , fare riferimento alla dichiarazione "Con nuTab.Columns ( 2) . Cells ... " Con la parola chiave dice a Visual Basic che non si desidera digitare una lunga serie di parole punteggiate di fare continuamente riferimento a un metodo di un oggetto o una proprietà (ad esempio Object1.Object2.Object3.doThis ( ) ) . Invece, si vuole zoomare proprio sui membri di un particolare oggetto nella catena . Per esempio :

Object1.Object2.Object3.doThis ( ) End With
applicare la formattazione

nuTab.AutoFormat dichiarazione ... applica un regime bordo alla tabella completa , mentre la prima istruzione With inizia per formattare una singola cella . La formattazione del codice è l'applicazione non è specifico per le celle della tabella , ma può funzionare con qualsiasi oggetto Range . I nuTab.Columns (2). Cells ( 2) oggetto sembra essere l'oggetto Range in questo caso .

Esperimento con diverse opzioni di formattazione di Word offre. Utilizzare il Visualizzatore oggetti per trovarli. Inizia con la ricerca di una soluzione nota ( ad es wdLineStyleSingle ) , e notando la raccolta di opzioni simili di cui è parte .

• Come calcolare anno bisestile con Microsoft Visual Basic 
• Progetti di Visual Basic