指定将标注线连接在标注文本框上的什么位置。可为文本框的顶部、底部、中间或距离文本框上下边界指定距离的一点。
expression.PresetDrop(DropType)
expression 必需。该表达式返回一个 CalloutFormat 对象。
DropType MsoCalloutDropType,必需。相对于文本边界框的标注线起始位置。如果将此参数指定为 msoCalloutDropCustom,则由 Drop 和 AutoAttach 属性值以及标注文本框与标注点(标注所指向的位置)的相对位置来决定将标注线连接到文本框上的什么位置。
MsoCalloutDropType 可以是下列 MsoCalloutDropType 常量之一: |
msoCalloutDropCenter |
msoCalloutDropMixed |
msoCalloutDropBottom |
msoCalloutDropCustom |
msoCalloutDropTop |
本示例将活动文档中的第一个图形的标注线连接在文本边界框的顶部。只有当第一个图形是标注时,本示例才会生效。
ActiveDocument.Shapes(1).Callout.PresetDrop msoCalloutDropTop
本示例将在切换活动文档中第一个图形的两个预设垂直距离。只有当第一个图形是标注时,本示例才会生效。
With ActiveDocument.Shapes(1).Callout
If .DropType = msoCalloutDropTop Then
.PresetDrop msoCalloutDropBottom
ElseIf .DropType = msoCalloutDropBottom Then
.PresetDrop msoCalloutDropTop
End If
End With