Saber como fazer referência a um objeto do Word você pode economizar tempo durante a programação em Visual Basic for Applications (VBA). Microsoft Word é um aplicativo de processamento de texto incluído no pacote Microsoft Office. VBA é uma linguagem de programação de uso geral em programas do Microsoft Office para automatizar tarefas rotineiras. Você precisa fazer referência a um objeto do Word antes de escrever código VBA para ler um documento do Word. Em poucos passos , você pode escrever algumas sub-rotinas para ler um documento Word. Instruções
1
Abra Microsoft Excel 2007 e clique na guia " Desenvolvedor " e selecione " Visual Basic ".
Clique no menu " Ferramentas " e selecione " References ... " . Marque a caixa ao lado de " Microsoft Word 12.0 Object Library " e selecione " OK".
2
Digite o seguinte para criar uma nova sub-rotina :
Sub WordReference ()
Pressione " Enter".
3
Digite o seguinte para fazer referência a um objeto do Word :
Dim WordDoc Como Word.Document
Set wordApplication = CreateObject (" Word.Application " )
Set WordDoc = wordApplication.Documents.Open ( "C: \\ WordDoc.Doc " )
Você pode editar "C: \\ WordDoc.Doc " e digite um caminho para o documento do Word que pretende referenciar
4
digite o seguinte para chamar o " ReadWord " sub-rotina : .
Chamada ReadWord ( WordDoc )
< br > 5
Digite o seguinte para criar o sub-rotina " ReadWord " e exibir uma caixa de mensagem com o texto lido a partir do documento do Word :
Private Sub ReadWord ( wrdDoc as Object )
Dim Prange Como Word.Range
Dim Pcnt As Long
Com wrdDoc
Para Pcnt = 1 To . Paragraphs.Count
Definir Prange = . Range ( Início: . = Os parágrafos ( Pcnt ) Range.Start , _
End : . . . = Os parágrafos ( Pcnt ) Range.End )
MsgBox ( pRange.Text )
Próxima Pcnt
. Fechar
End With
Sub End
6
Pressione " F5" para executar a sub-rotina " WordReference " .