Microsoft Word è un programma di elaborazione testi utilizzato per creare e formattare documenti . Visual Basic, Applications Edition (VBA ) è comunemente usato per automatizzare le operazioni ripetitive tra le applicazioni di Microsoft Office come Word , Excel e Access . In pochi passi si può scrivere un piccolo sub per leggere un documento di Word in VBA . Istruzioni
1

Aprire Microsoft Excel 2007. Fare clic sulla scheda " sviluppatori" e selezionare " Visual Basic ". Tipo " readWordDocuemnt Sub ( ) " e premere " Invio " per creare una nuova sotto
2

digitare quanto segue per dichiarare le variabili : .

Dim wordApplication Come Word.Application < br >

Dim wordDocument Come Word.Document

Dim pText As String Dim

Prange Come Word.Range

Dim pCount As Long Dim

rXLRow As Long
3

digitare quanto segue per creare una nuova cartella di lavoro di Excel e aprire il documento di Word da leggere :

Workbooks.Add

wordApplication = CreateObject ( " Word.Application " ) per

wordDocument = wordApplication.Documents.Open ( " C : \\ Testo in Word.doc " ) economici 4

digitare quanto segue per ciclo attraverso i paragrafi del documento Word e aggiungerli alla nuova cartella di lavoro di Excel : .

rXLRow = 2

wordDocument

pCount = 1 per Paragraphs.Count < br . >

Prange = Range ( inizio: . = paragrafi ( pCount ) Range.Start , _

Fine : . . . = paragrafi ( pCount ) Range.End ) per

pText = pRange.Text

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

rXLRow = rXLRow + 1

Avanti pCount

. Chiudi

End With
5

digitare quanto segue per salvare la nuova cartella di lavoro , chiudere Word e variabili chiare :

wordApplication.Quit

wordDocument = Nothin :

wordApplication = Nothing

ActiveWorkbook.Saved = True
6

Eseguire i sub
< br . >