CalloutFormat.PresetDrop Method
Specifies whether the callout line attaches to the top, bottom, or center of the callout text box or whether it attaches at a point that's a specified distance from the top or bottom of the text box.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Sub PresetDrop ( _
DropType As MsoCalloutDropType _
)
'Usage
Dim instance As CalloutFormat
Dim DropType As MsoCalloutDropType
instance.PresetDrop(DropType)
void PresetDrop(
MsoCalloutDropType DropType
)
Parameters
- DropType
Type: Microsoft.Office.Core.MsoCalloutDropType
The starting position of the callout line relative to the text bounding box.
Remarks
The DropType parameter value can be one of the following MsoCalloutDropType constants. Passing msoCalloutDropCustom will cause your code to fail.
msoCalloutDropBottom |
msoCalloutDropCenter |
msoCalloutDropCustom |
msoCalloutDropMixed |
msoCalloutDropTop |
Examples
This example specifies that the callout line attach to the top of the text bounding box for shape one on myDocument. For the example to work, shape one must be a callout.
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes(1).Callout.PresetDropmsoCalloutDropTop
This example switches between two preset drops for shape one on myDocument. For the example to work, shape one must be a callout.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).Callout
If .DropType = msoCalloutDropTop Then
.PresetDropmsoCalloutDropBottom
ElseIf .DropType = msoCalloutDropBottom Then
.PresetDropmsoCalloutDropTop
End If
End With