Saper utilizzare Microsoft Visual Basic Applications Edition (VBA) in Microsoft Word può essere molto utile. Word è un programma di elaborazione testi incluso nella suite Microsoft Office. VBA è comunemente usato per automatizzare operazioni di routine in Word e altre applicazioni di Microsoft Office. Un buon momento per utilizzare VBA in Word sarebbe se necessario inserire 500 tabelle in un documento e aggiungere i nomi dei campi a tutti loro. Il seguente è un piccolo esempio di come è possibile utilizzare VBA in Word, ma è possibile utilizzare VBA per automatizzare anche altre attività ripetitive.
Istruzioni
1
Aprire Microsoft Office Word 2007, fare clic sulla scheda "Sviluppatore" e selezionare "Visual Basic". Selezionare dal menu "Inserisci" e selezionare "Modulo".
2
Digitare il comando seguente per creare una nuova subroutine:
Private Sub useVBinWord()
Premere "Enter".
3
Digitare il comando seguente per inserire due righe di testo:
Selection. TypeText Text: = "Io sto inserendo il testo in questo documento di Word".
Selection.TypeParagraph
Selection. TypeText Text: = "Ho anche intenzione di inserire questa tabella:"
Selection.TypeParagraph
4
Digitare il comando seguente per inserire una tabella con quattro colonne e quattro righe:
ActiveDocument.Tables.Add Range, NumRows: = 4, NumColumns: = _
4, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
wdAutoFitFixed
With Selection.Tables(1)
If .Style <> "Table Grid" Then
.Style = "Table Grid"
End If
.ApplyStyleHeadingRows = True
.ApplyStyleLastRow = False
.ApplyStyleFirstColumn = True
.ApplyStyleLastColumn = False
.ApplyStyleRowBands = True
.ApplyStyleColumnBands = False
End With
5
Digitare il comando seguente per aggiungere nomi di campo alle colonne della tabella:
Selection. TypeText Text: = "Field1"
Selection. MoveRight Unit: = wdCell
Selection. TypeText Text: = "Campo2"
Selection. MoveRight Unit: = wdCell
Selection. TypeText Text: = "Field3"
Selection. MoveRight Unit: = wdCell
Selection. TypeText Text: = "Field4"
Premere "F5" per eseguire la subroutine.