Microsoft Word er et tekstbehandlingsprogram program, der bruges til at oprette og formatere dokumenter. Visual Basic for Applications ( VBA ) er almindeligt anvendt til at automatisere gentagne opgaver blandt Microsoft Office-programmer som Word, Excel og Access. I et par trin, du kan skrive en lille sub til at læse et Word-dokument i VBA. Instruktioner
1

Åbn Microsoft Excel 2007. Klik på " Udvikler "-fanen og vælg " Visual Basic ". Type " Sub readWordDocuemnt ()" og tryk "Enter " for at oprette en ny sub
2

Skriv følgende at erklære dine variabler : .

Dim wordApplication Som Word.Application < br >

Dim wordDocument Som Word.Document

Dim pText As String

Dim PRANGE Som Word.Range

Dim pCount As Long

Dim rXLRow As Long
3

Skriv følgende for at oprette en ny Excel-projektmappe og åbne Word- dokument, der skal læses : Hej

Workbooks.Add

Set wordApplication = CreateObject ( " Word.Application " )

Set wordDocument = wordApplication.Documents.Open ( "C: \\ Tekst i Word.doc " )
4

Skriv følgende at sløjfe gennem de punkter i Word-dokumentet og føje dem til den nye Excel-projektmappe : .

rXLRow = 2

Med wordDocument

pCount = 1 Til Paragraphs.Count < br . >

Set Prange = Range (Start: . = punkt ( pCount ) Range.Start , _

End :. . . = punkt ( pCount ) Range.End )

pText = pRange.Text

ActiveSheet.Range ("A " & rXLRow ) . Formel = pText

rXLRow = rXLRow + 1

Næste pCount

. Luk

End With
5

Skriv følgende for at gemme den nye projektmappe , afslutte Word og klare variabler : Hej

wordApplication.Quit

Set wordDocument = Nothin : Hej

Set wordApplication = Nothing

ActiveWorkbook.Saved = Sand
6

Udfør sub
< br . >