AddTextEffect Method

Applies To

Shapes collection object.

Description

Creates a WordArt object. Returns a Shape object that represents the new WordArt object.

Syntax

expression.AddTextEffect(PresetTextEffect, Text, FontName, FontSize, FontBold,
ú FontItalic, Left, Top)

expression Required. An expression that returns a Shapes object.

PresetTextEffect Required Long. The preset text effect. Can be one of the following MsoPresetTextEffect constants:

msoTextEffect1	msoTextEffect2
msoTextEffect3	msoTextEffect4
msoTextEffect5	msoTextEffect6
msoTextEffect7	msoTextEffect8
msoTextEffect9	msoTextEffect10
msoTextEffect11	msoTextEffect12
msoTextEffect13	msoTextEffect14
msoTextEffect15	msoTextEffect16
msoTextEffect17	msoTextEffect18
msoTextEffect19	msoTextEffect20
msoTextEffect21	msoTextEffect22
msoTextEffect23	msoTextEffect24
msoTextEffect25	msoTextEffect26
msoTextEffect27	msoTextEffect28
msoTextEffect29		msoTextEffect30

Text Required String. The text in the WordArt.

FontName Required String. The name of the font used in the WordArt.

FontSize Required Single. The size (in points) of the font used in the WordArt.

FontBold Required Long. True to set the font used in the WordArt to bold.

FontItalic Required Long. True to set the font used in the WordArt to italic.

Left, Top Required Single. The position (in points) of the upper-left corner of the WordArt's bounding box relative to the upper-left corner of the document.

Remarks

When you add WordArt to a document, the height and width of the WordArt are automatically set based on the size and amount of text you specify.

Example

This example adds WordArt that contains the text "Test" to myDocument.

Set myDocument = ActivePresentation.Slides(1)
Set newWordArt = myDocument.Shapes.AddTextEffect _
    (PresetTextEffect:=msoTextEffect1, Text:="Test", _
    FontName:="Arial Black", FontSize:=36, FontBold:=False, _
    FontItalic:=False, Left:=10, Top:=10)