Classe TextEffectFormat (PowerPoint VBA)

Contém propriedades e métodos que se aplicam a objetos WordArt.

Set

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

Dim tef as TextEffectFormat
Set tef = ActiveWindow.RangeFromPoint.TextEffect

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo TextEffectFormat: Shape.TextEffect e ShapeRange.TextEffect

Temas

Os procedimentos a seguir nesta aula foram agrupados e são descritos em uma página de tema separada

Format with its procedures FontBold, FontItalic, FontSize e NormalizedHeight

Propriedades

Alignment Retorna ou define o alinhamento para o WordArt especificado. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).TextEffect.Alignment = msoTextEffectAlignmentMixed

FontName Retorna ou define o nome da fonte no WordArt especificado. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).TextEffect.FontName = "Courier New"

KernedPairs Determina se será aplicado kerning aos pares de caracteres no WordArt especificado. Leitura/gravação.

ActiveWindow.RangeFromPoint.TextEffect.KernedPairs = msoTrue

Parent Retorna o objeto parente para o objeto especificado.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.TextEffect.Parent

PresetShape Retorna ou define a forma do WordArt especificado. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).TextEffect.PresetShape = msoTextEffectShapeMixed

PresetTextEffect Retorna ou define o estilo do WordArt especificado. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).TextEffect.PresetTextEffect = msoTextEffectMixed

RotatedChars Determina se os caracteres no WordArt especificado irão girar 90 graus em relação à forma delimitadora do WordArt. Leitura/gravação.

ActiveWindow.RangeFromPoint.TextEffect.RotatedChars = msoTrue

Text Retorna ou define um String que representa o texto contido no objeto especificado. Leitura/gravação.

ActiveWindow.RangeFromPoint.TextEffect.Text =

Tracking Retorna ou define a proporção entre o espaço horizontal alocado para cada caractere no texto especificado para a largura do caractere. Leitura/gravação.

ActiveWindow.RangeFromPoint.TextEffect.Tracking =