CanvasShapes.AddLabel (Word)
Agrega una etiqueta de texto a un lienzo de dibujo.
AddLabel (Orientation, Left, Top, Width, Height)
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
Estos son los argumentos con nombre :
Orientation (Office.MsoTextOrientation) - La orientación del texto.
Left (Single) - La posición, medida en puntos, del borde izquierdo de la etiqueta con relación al borde izquierdo del lienzo de dibujo.
Top (Single) - La posición, medida en puntos, del borde superior de la etiqueta con relación al borde superior del lienzo de dibujo.
Width (Single) - Ancho del rótulo, en puntos.
Height (Single) - Alto del rótulo, en puntos.