Shapes.AddLabel (Word)

Fügt einem Zeichenbereich eine Beschriftung hinzu.

AddLabel (Orientation, Left, Top, Width, Height, Anchor)

Sub NewCanvasTextLabel() 
 Dim shpCanvas As Shape 
 Dim shpLabel As Shape 
 
 'Add a drawing canvas to the active document 
 Set shpCanvas = ActiveDocument.Shapes.AddCanvas _ 
 (Left:=100, Top:=75, Width:=150, Height:=200) 
 
 'Add a label to the drawing canvas 
 Set

Arguments

Hier sind die benannte Argumente :

Orientation (Office.MsoTextOrientation) - Die Ausrichtung des Texts.

Left (Single) - Die in Punkt gemessene Position des linken Rands der Beschriftung relativ zum linken Rand des Zeichenbereichs.

Top (Single) - Die in Punkt gemessene Position des oberen Rands der Beschriftung relativ zum oberen Rand des Zeichenbereichs.

Width (Single) - Die Breite der Beschriftung in Punkt.

Height (Single) - Die Höhe der Beschriftung in Punkt.

Optional arguments

Das folgendes Argument ist optional

Anchor - Range