TextEffectFormat.PresetTextEffect-Eigenschaft (PowerPoint)
Gibt die Formatvorlage des angegebenen WordArt-Objekts zurück oder legt die Formatvorlage fest. Lese-/Schreibzugriff.
Syntax
Ausdruck. PresetTextEffect
Ausdruck Eine Variable, die ein TextEffectFormat-Objekt darstellt.
Rückgabewert
MsoPresetTextEffect
HinwBemerkungeneise
Durch Festlegen der PresetTextEffect -Eigenschaft wird automatisch festgelegt viele andere Formateigenschaften der angegebenen Form.
Der Wert der PresetTextEffect -Eigenschaft kann eine der folgenden MsoPresetTextEffect -Konstanten entsprechen.
msoTextEffect1 |
msoTextEffect2 |
msoTextEffect3 |
msoTextEffect4 |
msoTextEffect5 |
msoTextEffect6 |
msoTextEffect7 |
msoTextEffect8 |
msoTextEffect9 |
msoTextEffect10 |
msoTextEffect11 |
msoTextEffect12 |
msoTextEffect13 |
msoTextEffect14 |
msoTextEffect15 |
msoTextEffect16 |
msoTextEffect17 |
msoTextEffect18 |
msoTextEffect19 |
msoTextEffect20 |
msoTextEffect21 |
msoTextEffect22 |
msoTextEffect23 |
msoTextEffect24 |
msoTextEffect25 |
msoTextEffect26 |
msoTextEffect27 |
msoTextEffect28 |
msoTextEffect29 |
msoTextEffect30 |
msoTextEffectMixed |
Beispiel
In diesem Beispiel wird jeder WordArt in myDocument die Formatvorlage zugewiesen, die auf der Registerkarte Schnellformatvorlagen für WordArt an erster Stelle aufgelistet ist.
Set myDocument = ActivePresentation.Slides(1)
For Each s In myDocument.Shapes
If s.Type = msoTextEffect Then
s.TextEffect.PresetTextEffect = msoTextEffect1
End If
Next
Siehe auch
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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für