Share via


ShapeRange.TextEffect Property

Publisher Developer Reference

Returns a TextEffectFormat object that represents the text formatting properties of a WordArt object.

Syntax

expression.TextEffect

expression   A variable that represents a ShapeRange object.

Example

This example adds a WordArt object to the active publication and formats and inserts additional into it.

Visual Basic for Applications
  Sub AddFormatNewWordArt()
    With ActiveDocument.Pages(1).Shapes.AddTextEffect( _
            PresetTextEffect:=msoTextEffect1, Text:="Test", _
            FontName:="Snap ITC", FontSize:=30, FontBold:=msoTrue, _
            FontItalic:=msoFalse, Left:=150, Top:=130)
        .Rotation = 90
        With .TextEffect
            .RotatedChars = msoTrue
            .Text = "This is a " & .Text
        End With
        .Width = 250
    End With
End Sub

See Also