Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Erstellt ein Textfeld. Gibt ein Shape-Objekt zurück, das das neue Textfeld darstellt.
Syntax
Ausdruck.
AddTextbox( _Orientation_, _Left_, _Top_, _Width_, _Height_ )
expression Eine Variable, die ein Shapes-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Orientation | Erforderlich | MsoTextOrientation | Die Textausrichtung. Je nach ausgewählter oder installierter Sprachunterstützung (z. B. Deutsch) sind einige dieser Konstanten möglicherweise nicht verfügbar. |
| Left | Erforderlich | Single | Die in Punkten gemessene Position des linken Rands des Textfelds relativ zum linken Folienrand. |
| Top | Erforderlich | Single | Die in Punkten gemessene Position des oberen Rands des Textfelds relativ zum oberen Folienrand. |
| Width | Erforderlich | Single | Die in Punkten gemessene Breite des Textfelds. |
| Height | Erforderlich | Single | Die in Punkten gemessene Höhe des Textfelds. |
Rückgabewert
Form
Beispiel
In diesem Beispiel wird myDocument ein Textfeld hinzugefügt, das den Text "Test Box" enthält.
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
Left:=100, Top:=100, Width:=200, Height:=50).TextFrame _
.TextRange.Text = "Test Box"
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.