CanvasShapes.AddTextbox-Methode (Word)

Fügt einem Zeichenbereich ein Textfeld hinzu. Gibt ein Shape-Objekt zurück, welches das Textfeld darstellt.

Syntax

Ausdruck. AddTextbox (Ausrichtung, Links, Oben, Breite, Höhe)

Ausdruck: Erforderlich. Eine Variable, die ein CanvasShapes-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Orientation	Erforderlich	MsoTextOrientation	Die Ausrichtung des Texts. Je nach der ausgewählten bzw. installierten Sprachunterstützung (z. B. Deutsch) stehen möglicherweise nicht alle MsoTextOrientation-Konstanten zur Verfügung.
Left	Erforderlich	Single	Die in Punkt gemessene Position des linken Rands des Textfelds.
Top	Erforderlich	Single	Die in Punkt gemessene Position des oberen Rands des Textfelds.
Width	Erforderlich	Single	Die in Punkt gemessene Breite des Textfelds.
Height	Erforderlich	Single	Die in Punkt gemessene Höhe des Textfelds.

Beispiel

In diesem Beispiel wird einem Zeichenbereich in einem neuen Dokument ein Textfeld hinzugefügt.

Sub NewCanvasTextbox() 
 Dim docNew As Document 
 Dim shpCanvas As Shape 
 
 'Create a new document and add a drawing canvas 
 Set docNew = Documents.Add 
 Set shpCanvas = docNew.Shapes.AddCanvas _ 
 (Left:=100, Top:=75, Width:=150, Height:=200) 
 
 'Add a text box to the drawing canvas 
 shpCanvas.CanvasItems.AddTextbox _ 
 Orientation:=msoTextOrientationHorizontal, _ 
 Left:=1, Top:=1, Width:=100, Height:=100 
End Sub

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.