Свойство Shape.TextEffect (Издатель)
Возвращает объект TextEffectFormat , представляющий свойства форматирования текста объекта WordArt.
Синтаксис
expression. Texteffect
Выражение Переменная, представляющая объект Shape .
Пример
В этом примере объект WordArt добавляется в активную публикацию и форматирует и вставляет в него дополнительный текст.
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 и обратная связь.