Klasse TextStyleLevel (PowerPoint VBA)

Enthält Informationen zur Zeichen- und Absatzformatierung einer Gliederungsebene.

Set

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

Dim tsl as TextStyleLevel
Set tsl = ActivePresentation.SlideMaster.TextStyles(1).Levels(Level:=1)

Die folgenden Prozeduren können zum Festlegen der TextStyleLevel Klassenvariablen verwendet werden : TextStyleLevels.Item und TextStyle.Levels

Font

Gibt ein Font -Objekt, das Zeichenformat darstellt. Schreibgeschützt.

Dim fntFont As Font
Set fntFont = ActiveWindow.Selection.SlideRange(1).TextStyles(1).Levels(1).Font

ParagraphFormat

Gibt ein ParagraphFormat -Objekt, das absatzformatierung für den angegebenen Text darstellt. Schreibgeschützt.

Dim pftParagraphFormat As ParagraphFormat
Set pftParagraphFormat = ActiveWindow.Selection.SlideRange(1).TextStyles(1).Levels(1).ParagraphFormat

Parent

Gibt das übergeordnete Objekt für das angegebene Objekt zurück.

TextStyleLevels.Count

Gibt die Anzahl von Objekten in der angegebenen Auflistung zurück. Schreibgeschützt.

Dim lngCount As Long
lngCount = ActiveWindow.Selection.SlideRange(1).TextStyles(1).Levels.Count

TextStyleLevels.Item

Gibt eine einzelne Text Format Ebene aus der angegebenen TextStyleLevels -Auflistung zurück.

Syntax : expression.Item (Level)

Level: The index number of the text style level in the collection to be returned.The index number of the text style level in the collection to be returned.

Dim tsl As TextStyleLevel
Set tsl = ActivePresentation.SlideMaster.TextStyles(1).Levels(Level:=1)

TextStyleLevels.Parent

Gibt das übergeordnete Objekt für das angegebene Objekt zurück.