返回表示标注线与标注文本框的连接位置的值。MsoCalloutDropType 类型,只读。
MsoCalloutDropType 可为以下 MsoCalloutDropType 常量之一。 |
msoCalloutDropCenter |
msoCalloutDropMixed |
msoCalloutDropBottom |
msoCalloutDropCustom |
msoCalloutDropTop |
expression.DropType
expression 必需。该表达式返回“应用于”列表中的对象之一。
如果标注的垂直线类型为 msoCalloutDropCustom,则 Drop 属性和 AutoAttach 属性的值,以及标注文本框和标注线起点(标注所指向的位置)的相对位置将用于决定标注线与标注文本框的连接位置。
本属性只读。可用 PresetDrop 方法设置本属性的值。
本示例根据自定义的垂直距离值是大于还是小于标注文本框高度的一半,将 myDocument
上第一个图形的自定义垂直距离值替换为两个预置垂直距离值之一。为使本示例正常运行,第一个图形必须为标注。
Set myDocument = Worksheets(1)
With myDocument.Shapes(1).Callout
If .DropType = msoCalloutDropCustom Then
If .Drop < .Parent.Height / 2 Then
.PresetDrop msoCalloutDropTop
Else
.PresetDrop msoCalloutDropBottom
End If
End If
End With