TableOfContents.HeadingStyles-Eigenschaft (Word)

Gibt ein HeadingStyles-Objekt zurück, das zusätzliche Formatvorlagen darstellt, die zum Kompilieren eines Inhalts- oder Abbildungsverzeichnisses verwendet werden (andere Formatvorlagen als Überschriften 1 – Überschrift 9). Schreibgeschützt.

Syntax

Ausdruck. HeadingStyles

Ausdruck Eine Variable, die eine TableOfContents-Auflistung darstellt.

Beispiel

In diesem Beispiel wird der HeadingStyles-Auflistung eine Formatvorlage hinzugefügt, und dann werden die Namen aller Formatvorlagen in der Auflistung angezeigt.

Dim hsLoop As HeadingStyle 
 
If ActiveDocument.TablesOfContents.Count >=1 Then 
 ActiveDocument.TablesOfContents(1).HeadingStyles.Add _ 
 Style:="Title", Level:=2 
 For Each hsLoop In _ 
 ActiveDocument.TablesOfContents(1).HeadingStyles 
 MsgBox hsLoop.Style 
 Next hsLoop 
End If

In diesem Beispiel wird in einem Inhaltsverzeichnis für das Dokument Sales.doc der HeadingStyles-Auflistung eine Formatvorlage namens Blue hinzugefügt.

With Documents("Sales.doc") 
 .Styles.Add Name:="Blue" 
 .TablesOfContents(1).UseHeadingStyles = True 
 .TablesOfContents(1).HeadingStyles.Add _ 
 Style:="Blue", Level:=4 
End With

Siehe auch

TableOfContents-Objekt

Support und Feedback

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.