Share via


TextEffectFormat.PresetShape Property (Excel)

Returns or sets the shape of the specified WordArt. Read/write MsoPresetTextEffectShape.

Syntax

expression .PresetShape

expression A variable that represents a TextEffectFormat object.

Remarks

MsoPresetTextEffectShape can be one of these MsoPresetTextEffectShape constants.

msoTextEffectShapeArchDownCurve

msoTextEffectShapeArchDownPour

msoTextEffectShapeArchUpCurve

msoTextEffectShapeArchUpPour

msoTextEffectShapeButtonCurve

msoTextEffectShapeButtonPour

msoTextEffectShapeCanDown

msoTextEffectShapeCanUp

msoTextEffectShapeCascadeDown

msoTextEffectShapeCascadeUp

msoTextEffectShapeChevronDown

msoTextEffectShapeChevronUp

msoTextEffectShapeCircleCurve

msoTextEffectShapeCirclePour

msoTextEffectShapeCurveDown

msoTextEffectShapeCurveUp

msoTextEffectShapeDeflate

msoTextEffectShapeDeflateBottom

msoTextEffectShapeDeflateInflateDeflate

msoTextEffectShapeDoubleWave1

msoTextEffectShapeFadeDown

msoTextEffectShapeFadeRight

msoTextEffectShapeInflate

msoTextEffectShapeInflateTop

msoTextEffectShapePlainText

msoTextEffectShapeRingOutside

msoTextEffectShapeSlantUp

msoTextEffectShapeTriangleDown

msoTextEffectShapeWave1

msoTextEffectShapeDeflateInflate

msoTextEffectShapeDeflateTop

msoTextEffectShapeDoubleWave2

msoTextEffectShapeFadeLeft

msoTextEffectShapeFadeUp

msoTextEffectShapeInflateBottom

msoTextEffectShapeMixed

msoTextEffectShapeRingInside

msoTextEffectShapeSlantDown

msoTextEffectShapeStop

msoTextEffectShapeTriangleUp

msoTextEffectShapeWave2

Setting the PresetTextEffect property automatically sets the PresetShape property.

Example

This example sets the shape of all WordArt on myDocument to a chevron whose center points down.

Set myDocument = Worksheets(1) 
For Each s In myDocument.Shapes 
 If s.Type = msoTextEffect Then 
 s.TextEffect.PresetShape = msoTextEffectShapeChevronDown 
 End If 
Next

See Also

Concepts

TextEffectFormat Object

TextEffectFormat Object Members