CustomDrop 方法

       

以磅为单位设置从文本框边界到标注线连接文本框位置的垂直距离。该距离通常从文本框顶端测量,但当 AutoAttach 属性值设为 True 且文本框位于标注线源位置(该标注所指向的位置)的左侧时,该垂直距离从文本框底端测量。

expression.CustomDrop(Drop)

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

Drop  必选。Single 类型。垂直距离,以磅为单位。

示例

本示例将自定义垂直距离设为 14 磅,并指定该垂直距离总是从顶端测量。要使本示例执行,第三个形状必须是标注。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(3).Callout
    .CustomDrop 14
    .AutoAttach = False
End With