PresetDrop 方法

       

指定将标注线连接在标注文本框上的什么位置。可为文本框的顶部、底部、中间或距离文本框上下边界指定距离的一点。

expression.PresetDrop(DropType)

expression   必需。该表达式返回一个 CalloutFormat 对象。

 DropType  MsoCalloutDropType,必需。相对于文本边界框的标注线起始位置。如果将此参数指定为 msoCalloutDropCustom,则由 DropAutoAttach 属性值以及标注文本框与标注点(标注所指向的位置)的相对位置来决定将标注线连接到文本框上的什么位置。

示例

本示例将活动文档中的第一个图形的标注线连接在文本边界框的顶部。只有当第一个图形是标注时,本示例才会生效。

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