Styles-Objekt (Word)
Eine Auflistung von Style-Objekten , die sowohl die integrierten als auch die benutzerdefinierten Formatvorlagen in einem Dokument darstellen.
Mit der Styles-Eigenschaft geben Sie die Styles-Auflistung zurück. Im folgenden Beispiel werden alle benutzerdefinierten Formatvorlagen im aktiven Dokument gelöscht.
For Each sty In ActiveDocument.Styles
If sty.BuiltIn = False Then sty.Delete
Next sty
Mit der Add-Methode erstellen Sie eine neue benutzerdefinierte Formatvorlage und fügen sie der Styles-Auflistung hinzu. Im folgenden Beispiel wird die neue Zeichenformatvorlage "Introduction" hinzugefügt und wie folgt definiert: 12 Punkt, Arial, Fett und Kursiv. Anschließend wird der Auswahl die neue Zeichenformatvorlage zugewiesen.
Set myStyle = ActiveDocument.Styles.Add(Name:="Introduction", _
Type:=wdStyleTypeCharacter)
With myStyle.Font
.Bold = True
.Italic = True
.Name = "Arial"
.Size = 12
End With
Selection.Range.Style = "Introduction"
Verwenden Sie Styles (Index), wobei Index der Formatvorlagenname, eine WdBuiltinStyle-Konstante oder Indexnummer ist, um ein einzelnes Style-Objekt zurückzugeben. Sie müssen die Rechtschreibung und die Abstände zwischen den Namen der Formatvorlage, aber nicht unbedingt die Groß-/Kleinschreibung exakt übereinstimmen. Im folgenden Beispiel wird die Schriftart der benutzerdefinierten Formatvorlage "Color" im aktiven Dokument geändert.
ActiveDocument.Styles("Color").Font.Name = "Arial"
The following example sets the built-in Heading 1 style to not be bold.
ActiveDocument.Styles(wdStyleHeading1).Font.Bold = False
Die Indexnummer der Formatvorlage stellt die Position der Formatvorlage in der alphabetisch sortierten Liste der Formatvorlagennamen dar. Beachten Sie, dass Styles(1)
die erste Formatvorlage in der alphabetischen Liste ist. Im folgenden Beispiel werden die Basisformatvorlage und der Name der ersten Formatvorlage in der Styles -Auflistung angezeigt.
MsgBox "Base style= " _
& ActiveDocument.Styles(1).BaseStyle & vbCr _
& "Style name= " & ActiveDocument.Styles(1).NameLocal
Das Styles-Objekt ist nicht über ein Template-Objekt verfügbar. Sie können jedoch mit der OpenAsDocument -Methode eine Dokumentvorlage als Dokument öffnen, um die Formatvorlagen in der Dokumentvorlage zu ändern. Im folgenden Beispiel wird die Formatierung der Formatvorlage "Heading 1" in der mit dem aktiven Dokument verbundenen Dokumentvorlage geändert.
Set aDoc = ActiveDocument.AttachedTemplate.OpenAsDocument
With aDoc
.Styles(wdStyleHeading1).Font.Name = "Arial"
.Close SaveChanges:=wdSaveChanges
End With
Verwenden Sie die OrganizerCopy-Methode , um Formatvorlagen zwischen Dokumenten und Vorlagen zu kopieren. Mit der UpdateStyles -Methode aktualisieren Sie Formatvorlagen im aktiven Dokument, damit sie den Formatdefinitionen in der verbundenen Dokumentvorlage entsprechen.
Name |
---|
Application |
Count |
Creator |
Parent |
Referenz zum Word-Objektmodell
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.