Klasse Styles (Word VBA)

Eine Auflistung von Style -Objekten, die die integrierten und benutzerdefinierten Formatvorlagen in einem Dokument darstellen.

Um eine Styles -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim stys as Styles
Set stys = ActiveDocument.Styles

Klassen Variablen vom Typ Styles können mit der Prozedur Document.Styles festgelegt werden

For Each

Hier ist ein Beispiel für die Verarbeitung der Styles -Elemente in einer Sammlung

Dim sty As Style
For Each sty In ActiveDocument.Range.Styles
	
Next sty

Add

Erstellt eine neue benutzerdefinierte Formatvorlage und fügt Sie der Styles -Auflistung hinzu.

Add (Name, Type)

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"

Arguments

Ein benanntes Argument

Name (String) - Der neue Formatvorlagenname.

Optional arguments

Das folgendes Argument ist optional

Type (WdStyleType) - Dies kann eine der WdStyleType -Konstanten sein.


Möglichen Werte sind

wdStyleTypeCharacter Textkörper-Formatvorlage.
wdStyleTypeLinked
wdStyleTypeList Listenformatvorlage.
wdStyleTypeParagraph Absatzformatvorlage.
wdStyleTypeParagraphOnly
wdStyleTypeTable Tabellenformatvorlage.

Count

Gibt einen Wert vom Typ Long zurück, der die Anzahl der Formatvorlagen in der Auflistung darstellt.

Dim lngCount As Long
lngCount = ActiveDocument.Styles.Count

Item

Gibt ein einzelnes Style -Objekt in einer Auflistung zurück.

Item (Index)

Index: Das einzelne Objekt zurückgegeben werden soll.

Dim sty As Style
Set sty = ActiveDocument.Styles(Index:=1)