TextEffectFormat. PresetTextEffect-Eigenschaft (Publisher)TextEffectFormat.PresetTextEffect property (Publisher)

Gibt eine MsoPresetTextEffect -Konstante zurück, die die Formatvorlage des angegebenen WordArt-Objekts darstellt, oder legt diese fest.Returns or sets an MsoPresetTextEffect constant that represents the style of the specified WordArt. Die Werte für diese Eigenschaft entsprechen den Formaten im Dialogfeld WordArt-Katalog von links nach rechts und von oben nach unten nummeriert.The values for this property correspond to the formats in the WordArt Gallery dialog box, numbered from left to right, top to bottom. Lese-/Schreibzugriff.Read/write.

SyntaxSyntax

Ausdruck. PresetTextEffectexpression.PresetTextEffect

Ausdruck Eine Variable, die ein TextEffectFormat -Objekt darstellt.expression A variable that represents a TextEffectFormat object.

RückgabewertReturn value

MsoPresetTextEffectMsoPresetTextEffect

BemerkungenRemarks

Der Wert der PresetTextEffect -Eigenschaft kann eine der in der Microsoft Office Typbibliothek deklarierten MsoPresetTextEffect -Konstanten sein.The PresetTextEffect property value can be one of the MsoPresetTextEffect constants declared in the Microsoft Office type library.

BeispielExample

Dieses Beispiel legt den Texteffektstil für die erste Form auf der ersten Seite der aktiven Publikation fest.This example sets the text effect style for the first shape on the first page of the active publication. Dieses Beispiel geht davon aus, dass sich auf der ersten Seite der aktiven Publikation mindestens eine Form befindet.This example assumes that there is at least one shape on the first page of the active publication.

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

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.