CalloutFormat.DropType 属性 (Word)
返回一个值,该值指示标注线与标注文本框的连接位置。 只读的 MsoCalloutDropType 。
语法
表达式。DropType
expression 是必需的。 一个代表“CalloutFormat”对象的变量。
备注
如果标注类型是 msoCalloutDropCustom ,标注文本框的相对位置和 除去 并 AutoAttach 属性的值,标注线起点 (标注线所指向的位置) 用来确定标注线与文本框的连接位置。
此属性是只读的。 使用 PresetDrop 方法来设置此属性的值。
示例
本示例检查并判定活动文档中的第三个图形是否是自定义垂直距离的标注。 如果是,则根据此距离值是大于还是小于标注文本框的一半高度,将自定义垂直距离替换为两个预设值之一。
Dim docActive As Document
Set docActive = ActiveDocument
With docActive.Shapes(3)
If .Type = msoCallout Then
With .Callout
If .DropType = msoCalloutDropCustom Then
If .Drop < .Parent.Height / 2 Then
.PresetDrop msoCalloutDropTop
Else
.PresetDrop msoCalloutDropBottom
End If
End If
End With
End If
End With
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。