Shapes.AddCallout (Word)
Agrega una llamada con línea sin borde a un lienzo de dibujo.
Puede insertar una mayor variedad de llamadas, como globos y nubes, mediante el método AddShape .
AddCallout (Type, Left, Top, Width, Height, Anchor)
Sub NewCanvasCallout()
Dim shpCanvas As Shape
'Add drawing canvas to the active document
Set shpCanvas = ActiveDocument.Shapes.AddCanvas _
(Left:=150, Top:=150, Width:=200, Height:=300)
'Add callout to the drawing canvas
shpCanvas.CanvasItems.AddCallout _
Type:=msoCalloutTwo, Left:=100, _
Top:=40, Width:=150, Height:=75
End Sub
Arguments
Estos son los argumentos con nombre :
Type (Office.MsoCalloutType) - Tipo de llamada.
Left (Single) - Posición, en puntos, del borde izquierdo del cuadro de límite de la llamada.
Top (Single) - La posición, en puntos, del borde superior del cuadro de límite de la llamada.
Width (Single) - El ancho, en puntos, del cuadro de límite de la llamada.
Height (Single) - El alto, en puntos, del cuadro de límite de la llamada.
Optional arguments
Los siguientes argumentos son opcionales
Anchor - Range