CanvasShapes.AddCallout Method
Creates a borderless line callout. Returns a CanvasShapes object that represents the new callout.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Function AddCallout ( _
Type As MsoCalloutType, _
Left As Single, _
Top As Single, _
Width As Single, _
Height As Single _
) As Shape
'Usage
Dim instance As CanvasShapes
Dim Type As MsoCalloutType
Dim Left As Single
Dim Top As Single
Dim Width As Single
Dim Height As Single
Dim returnValue As Shape
returnValue = instance.AddCallout(Type, _
Left, Top, Width, Height)
Shape AddCallout(
MsoCalloutType Type,
float Left,
float Top,
float Width,
float Height
)
Parameters
- Type
Type: Microsoft.Office.Core.MsoCalloutType
The type of callout line.
- Left
Type: System.Single
The position, measured in points, of the left edge of the callout's bounding box relative to the left edge of the slide.
- Top
Type: System.Single
The position, measured in points, of the top edge of the callout's bounding box relative to the top edge of the slide.
- Width
Type: System.Single
The width of the callout's bounding box, measured in points.
- Height
Type: System.Single
The height of the callout's bounding box, measured in points.
Return Value
Type: Microsoft.Office.Interop.PowerPoint.Shape
Shape
Remarks
You can insert a greater variety of callouts by using the AddShape(MsoAutoShapeType, Single, Single, Single, Single) method.
Examples
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.
Sub NewCallout()
Dim sldOne As Slide
Set sldOne = ActivePresentation.Slides(1)
sldOne.Shapes.AddCallout(Type:=msoCalloutTwo, Left:=50, Top:=50, _
Width:=200, Height:=100).Callout.Angle = msoCalloutAngle30
End Sub