Freigeben über


TextEffectFormat.PresetShape-Eigenschaft (Publisher)

Gibt eine MsoPresetTextEffectShape-Konstante zurück, die die Form des angegebenen WordArt-Objekts darstellt, oder legt sie fest. Lese-/Schreibzugriff.

Syntax

Ausdruck. PresetShape

Ausdruck Eine Variable, die ein TextEffectFormat-Objekt darstellt.

Rückgabewert

MsoPresetTextEffectShape

Hinweise

Der PresetShape-Eigenschaftswert kann eine der in der Microsoft Office-Typbibliothek deklarierten MsoPresetTextEffectShape-Konstanten sein.

Beispiel

Dieses Beispiel legt die Form der ersten Form auf der ersten Seite der aktiven Publikation auf einen Richtungspfeil fest, dessen Mittelpunkt nach unten zeigt. Damit dieses Beispiel funktioniert, muss die erste Form eine WordArt-Form sein.

Sub ChangeTextEffect() 
 With ActiveDocument.Pages(1).Shapes(1) 
 If .Type = msoTextEffect Then 
 .TextEffect.PresetShape = msoTextEffectShapeChevronDown 
 End If 
 End With 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.