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