Anmerkung
Der Zugriff auf diese Seite erfordert eine Genehmigung. Du kannst versuchen, dich anzumelden oder die Verzeichnisse zu wechseln.
Der Zugriff auf diese Seite erfordert eine Genehmigung. Du kannst versuchen , die Verzeichnisse 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.