Shapes.AddTextEffect Method (PowerPoint)
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 A variable that represents a Shapes object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
PresetTextEffect |
Required |
MsoPresetTextEffect |
The preset text effect. |
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 |
MsoTriState |
Determines whether the font used in the WordArt is set to bold. |
FontItalic |
Required |
MsoTriState |
Determines whether the font used in the WordArt is set to italic. |
Left |
Required |
Single |
The position, measured in points, of the left edge of the WordArt's bounding box relative to the left edge of the slide. |
Top |
Required |
Single |
The position, measured in points, of the top edge of the WordArt's bounding box relative to the top edge of the slide. |
Return Value
Shape
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:=msoFalse, FontItalic:=msoFalse, Left:=10, Top:=10)