AddCallout Method [Excel 2003 VBA Language Reference]

  • Article

Creates a borderless line callout. Returns a Shape object that represents the new callout.

expression.AddCallout(Type, Left, Top, Width, Height)

expression Required. An expression that returns one of the objects in the Applies to List.

MsoCalloutType

MsoCalloutType can be one of these MsoCalloutType constants.
msoCalloutOne. A single-segment callout line that can be either horizontal or vertical.
msoCalloutTwo. A single-segment callout line that rotates freely.
msoCalloutMixed.
msoCalloutThree. A two-segment line.
msoCalloutFour. A three-segment line.

Left Required Single. The position (in points) of the upper-left corner of the callout's bounding box relative to the upper-left corner of the document.

Top Required Single. The position (in points) of the upper-left corner of the callout's bounding box relative to the upper-left corner of the document.

Width Required Single. The width of the callout's bounding box, in points.

Height Required Single. The height of the callout's bounding box, in points.

Remarks

You can insert a greater variety of callouts by using the AddShape method.

Example

This example adds a borderless callout with a freely rotating one-segment callout line to myDocument and then sets the callout angle to 30 degrees.

Set myDocument = Worksheets(1)
myDocument.Shapes.AddCallout(Type:=msoCalloutTwo, _
    Left:=50, Top:=50, Width:=200, Height:=100) _
    .Callout.Angle = msoCalloutAngle30

Applies to | Shapes Collection