Shape.TextEffect Property (Publisher)
Returns a TextEffectFormat object that represents the text formatting properties of a WordArt object.
Syntax
expression .TextEffect
expression A variable that represents a Shape object.
Example
This example adds a WordArt object to the active publication and formats and inserts additional into it.
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