Classe TextStyle (PowerPoint VBA)

A classe TextStyle representa uma das três estilos de texto: texto de título, corpo de texto ou texto padrão. Cada estilo de texto contém um objeto TextFrame que descreve como o texto é colocado dentro da caixa delimitadora de texto, um objeto de régua que contém uma coleção TextStyleLevels que contém informações de formatação de texto de estrutura de tópicos e informações de formatação de recuo de tópico e paradas de tabulação. O objeto TextStyle é um membro da coleção TextStyles.

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

Dim tse as TextStyle
Set tse = ActivePresentation.SlideMaster.TextStyles(Type:=1)

As variáveis ​​de classe TextStyle podem ser definidas usando o procedimento TextStyles.Item.

Levels

Retorna um objeto TextStyleLevels que representa a formatação de texto da estrutura de tópicos. Somente leitura.

Dim tslsLevels As TextStyleLevels
Set tslsLevels = ActivePresentation.SlideMaster.TextStyles(1).Levels

Ruler

Retorna um objeto de régua que representa a régua para o texto especificado. Somente leitura.

Dim rlrRuler As Ruler
Set rlrRuler = ActiveWindow.Selection.SlideRange(1).TextStyles(1).Ruler

TextFrame

Retorna um objeto TextFrame que contém o alinhamento e ancoragem propriedades para a forma especificada ou estilo de texto mestre.

Use a propriedade TextRange do objeto TextFrame para retornar o texto no quadro de texto. Use a propriedade HasTextFrame para determinar se uma forma contém um quadro de texto antes de aplicar a propriedade TextFrame .

Dim tfeTextFrame As TextFrame
Set tfeTextFrame = ActiveWindow.Selection.SlideRange(1).TextStyles(1).TextFrame