AddCallout Method
Applies To
Shapes collection object.
Description
Creates a borderless line callout. Returns a Shape object that represents the new callout.
Syntax
expression.AddCallout(Type, Left, Top, Width, Height)
expression Required. An expression that returns a Shapes object.
Type Required Long. The type of callout line. Can be one of the following MsoCalloutType constants: msoCalloutOne (a single-segment callout line that can be either horizontal or vertical), msoCalloutTwo (a single-segment callout line that rotates freely), msoCalloutThree (a two-segment line), or msoCalloutFour (a three-segment line).
Left, 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, Height Required Single. The width and 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(msoCalloutTwo, 50, 50, 200, 100). _
Callout.Angle = msoCalloutAngle30