返回或设置指定的艺术字样式。 读/写 MsoPresetTextEffect。
语法
表达式。PresetTextEffect
表达 一个代表 TextEffectFormat 对象的变量。
备注
该属性的值与“艺术字库”对话框内的格式（按从左至右和从上至下的顺序编号）相对应。
设置 PresetTextEffect 属性将自动设置指定图形的许多其他格式设置属性。
示例
本示例将 myDocument 上所有艺术字的样式设置为艺术 字库 对话框中列出的第一个样式。
Set myDocument = Worksheets(1)
For Each s In myDocument.Shapes
If s.Type = msoTextEffect Then
s.TextEffect.PresetTextEffect = msoTextEffect1
End If
Next
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。