Saber como usar o Microsoft Visual Basic for Applications (VBA) no Microsoft Word pode ser bastante útil. Word é um programa de processamento de texto incluído no pacote Microsoft Office. VBA é comumente usado para automatizar tarefas de rotina no Word e outros aplicativos do Microsoft Office. Um bom momento para usar o VBA no Word seria se você precisasse inserir 500 tabelas em um documento e adicionar nomes de campo para todos eles. O que se segue é um pequeno exemplo de como você pode usar o VBA no Word, mas você pode usar o VBA para automatizar tarefas repetitivas outros também. Instruções
1

Abra o Microsoft Office Word 2007 , clique na guia "Desenvolvedor" e selecione " Visual Basic ". . " Module" Selecione o menu "Inserir " e selecione
2

Digite o seguinte para criar uma nova sub-rotina :

Private Sub useVBinWord ()

Imprensa " . Enter "
3

Digite o seguinte para inserir duas linhas de texto :

Selection.TypeText texto : =" Eu estou inserindo este texto a este documento do Word. "

Selection.TypeParagraph

Selection.TypeText Texto: =" Eu também estou indo para inserir nesta tabela: "

Selection.TypeParagraph
4

Digite o seguinte para inserir uma tabela com quatro colunas e quatro linhas :

ActiveDocument.Tables.Add Gama: = Selection.Range , numRows : = 4, NumColumns : = _

4 , DefaultTableBehavior : = wdWord9TableBehavior , AutoFitBehavior : . = _

wdAutoFitFixed

Com Selection.Tables (1)

Se Estilo <> " Tabela Grid" Então

. style = " Tabela Grid"

End If

. ApplyStyleHeadingRows =
verdadeira

. ApplyStyleLastRow = False

. ApplyStyleFirstColumn = True

. ApplyStyleLastColumn =
Falso

. ApplyStyleRowBands = True

. ApplyStyleColumnBands = False

End With
5

Digite o seguinte para adicionar nomes de campo para as colunas da tabela :

Selection.TypeText Texto: = " campo1 "

Selection.MoveRight Unit : = wdCell

Selection.TypeText Texto: = " campo2 "

Unidade Selection.MoveRight : = wdCell

Selection.TypeText Texto: = " campo3 "

Selection.MoveRight Unit : = wdCell

Selection.TypeText Texto: . = " Field4 "

Pressione " F5" para executar sua rotina