Document.Styles (Word)
Gibt eine Styles -Auflistung für das angegebene Dokument zurück.
Informationen zum Zurückgeben eines einzelnen Elements einer Auflistung finden Sie unter zurückgeben eines Objekts aus einer Auflistung.
For Each para In ActiveDocument.Paragraphs
If para.Range.Words(1).Text = "Chapter " Then
para.Style = ActiveDocument.Styles(wdStyleHeading1)
End If
Next para