Wie Sie VBA verwenden, um ein Microsoft Word-Dokument lesen

June 19

Wie Sie VBA verwenden, um ein Microsoft Word-Dokument lesen

Microsoft Word ist ein Textverarbeitungsprogramm-Programm zum Erstellen und Formatieren von Dokumenten verwendet. Visual Basic für Applikationen (VBA) wird häufig verwendet, um sich wiederholende Aufgaben unter Microsoft Office-Anwendungen wie Word, Excel und Access zu automatisieren. In wenigen Schritten können Sie eine kleine Sub um ein Word-Dokument in VBA lesen schreiben.

Anweisungen

1 Öffnen Sie Microsoft Excel 2007. Klicken Sie auf die Registerkarte "Entwicklertools" und wählen Sie "Visual Basic." Geben Sie "Sub readWordDocuemnt()", und drücken Sie "Enter" eine neue Sub erstellen.

2 Geben Sie Folgendes ein, um Variablen deklarieren:

Dim WordApplication als "Word.Application"

Worddokument As Word.Document Dim

PText As String Dim

Dim pRange als Word.Range

Dim pCount As Long

Dim rXLRow As Long

3 Geben Sie Folgendes ein, um eine neue Excel-Arbeitsmappe erstellen und öffnen Sie das Word-Dokument zu lesen:

Workbooks.Add

Set WordApplication = CreateObject("Word.Application")

Worddokument festlegen = wordApplication.Documents.Open ("C:\Text in Word.doc")

4 Geben Sie Folgendes ein, um eine Schleife durch die Absätze im Word-Dokument und fügen sie Sie der neuen Excel-Arbeitsmappe:

rXLRow = 2

Mit Worddokument

Für pCount = 1 To. Paragraphs.Count

Legen Sie pRange =. Bereich (Start: =. Paragraphs(pCount). Range.Start _

Ende: =. Paragraphs(pCount). Range.End)

pText = pRange.Text

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

rXLRow = rXLRow + 1

Nächste pCount

. Schließen

Enden mit

5 Geben Sie Folgendes ein, um die neue Arbeitsmappe speichern, Word beenden und deaktivieren Sie Variablen:

wordApplication.Quit

Worddokument festgelegt = nix:

Set WordApplication = Nothing

ActiveWorkbook.Saved = True

6 Führen Sie die Sub.