Shape.TextEffect 属性 (Publisher)

返回一个 TextEffectFormat 对象，该对象表示的文本格式设置艺术字对象的属性。

语法

表达式。TextEffect

表达 一个代表 Shape 对象的变量。

示例

本示例将艺术字对象添加到当前出版物并设置其格式，并在其中插入其他文本。

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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。