Classe TextStyleLevel (PowerPoint VBA)

Contém informações de formatação de parágrafo e de caractere para um nível da estrutura de tópicos.

Set

Para usar uma variável de classe TextStyleLevel, ela primeiro precisa ser instanciada por exemplo

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

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo TextStyleLevel: TextStyleLevels.Item e TextStyle.Levels

Font

Retorna um objeto Font que representa a formatação de caractere. Somente leitura.

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

ParagraphFormat

Retorna um objeto ParagraphFormat que representa a formatação de parágrafo do texto especificado. Somente leitura.

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

Parent

Retorna o objeto parente para o objeto especificado.

TextStyleLevels.Count

Retorna o número de objetos na coleção especificada. Somente leitura.

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

TextStyleLevels.Item

Retorna um único nível de estilo de texto da coleção TextStyleLevels especificada.

Sintaxe : expression.Item (Level)

Level: O número de índice do nível de estilo de texto da coleção a ser retornado.

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

TextStyleLevels.Parent

Retorna o objeto parente para o objeto especificado.