Shapes.AddLabel (Word)
Adds a text label to a drawing canvas.
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
The following arguments are required:
Orientation (Office.MsoTextOrientation) - The orientation of the text.
Left (Single) - The position, measured in points, of the left edge of the label relative to the left edge of the drawing canvas.
Top (Single) - The position, measured in points, of the top edge of the label relative to the top edge of the drawing canvas.
Width (Single) - The width of the label, in points.
Height (Single) - The height of the label, in points.
Optional arguments
The following argument is optional
Anchor - Range