Shapes.AddTextEffect-Methode (PowerPoint)

Erstellt ein WordArt-Objekt. Gibt ein Shape -Objekt zurück, das das neue WordArt-Objekt darstellt.

Syntax

Ausdruck. AddTextEffect( _PresetTextEffect_, _Text_, _FontName_, _FontSize_, _FontBold_, _FontItalic_, _Left_, _Top_ )

expression Eine Variable, die ein Shapes-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
PresetTextEffect	Erforderlich	MsoPresetTextEffect	Der voreingestellte Texteffekt.
Text	Erforderlich	String	Der Text in der WordArt.
FontName	Erforderlich	String	Der Name der Schriftart, die in der WordArt verwendet wird.
FontSize	Erforderlich	Single	Die Größe der in der WordArt verwendeten Schrift (in Punkten).
FontBold	Erforderlich	MsoTriState	Bestimmt, ob die Schrift in der WordArt fett formatiert ist.
FontItalic	Erforderlich	MsoTriState	Bestimmt, ob die Schrift in der WordArt kursiv formatiert ist.
Left	Erforderlich	Single	Die in Punkten gemessene Position des linken Rands des Begrenzungsfelds der WordArt relativ zum linken Folienrand.
Top	Erforderlich	Single	Die in Punkten gemessene Position des oberen Rands des Begrenzungsfelds der WordArt relativ zum oberen Folienrand.

Rückgabewert

Form

Bemerkungen

Wenn Sie einem Dokument WordArt hinzufügen, werden die Höhe und Breite der WordArt automatisch anhand der Höhe und Menge des angegebenen Texts festgelegt.

Beispiel

In diesem Beispiel wird myDocument WordArt hinzugefügt, die den Text "Test" enthält.

Set myDocument = ActivePresentation.Slides(1) 
Set newWordArt = myDocument.Shapes _ 
    .AddTextEffect(PresetTextEffect:=msoTextEffect1, _ 
    Text:="Test", FontName:="Arial Black", FontSize:=36, _ 
    FontBold:=msoFalse, FontItalic:=msoFalse, Left:=10, Top:=10)

Siehe auch

Shapes-Objekt

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.