Classe TextStyleLevel (PowerPoint VBA)

Contient les instructions de mise en forme de paragraphe et de caractère pour un niveau hiérarchique.

Set

Pour utiliser une variable de classe TextStyleLevel, elle doit d'abord être instanciée, par exemple

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

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe TextStyleLevel : TextStyleLevels.Item et TextStyle.Levels

Font

Renvoie un objet font qui représente la mise en forme de caractères. En lecture seule.

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

ParagraphFormat

Renvoie un objet ParagraphFormat qui représente la mise en forme de paragraphe du texte spécifié. En lecture seule.

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

Parent

Renvoie l’objet parent de l’objet spécifié.

TextStyleLevels.Count

Renvoie le nombre d'objets de la collection spécifiée. En lecture seule.

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

TextStyleLevels.Item

Cette méthode renvoie un niveau de style de texte unique à partir de la collection TextStyleLevels spécifiée.

Syntaxe : expression.Item (Level)

Level: Numéro d’index du niveau de style de texte à renvoyer à partir de la collection.

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

TextStyleLevels.Parent

Renvoie l’objet parent de l’objet spécifié.