ShapeRange.TextEffect プロパティ (Publisher)

ワードアート オブジェクトのプロパティを書式設定するテキストを表す TextEffectFormat オブジェクトを返します。

構文

式。TextEffect

式ShapeRange オブジェクトを表す変数。

例

次の使用例は、作業中の文書にワードアート オブジェクトを追加し、書式を設定し、その文書に追加のテキストを挿入します。

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 のサポートおよびフィードバックを参照してください。