CalloutFormat.Drop 属性 (Excel)

对于具有显式设置的放置值的标注,此属性返回垂直距离 (,以 为单位,从文本边界框边缘) 到标注线附加到文本框的位置。 只读的 单一

语法

表达式下降

表达 一个代表 CalloutFormat 对象的变量。

备注

此距离是从文本框顶部测量的,除非 AutoAttach 属性设置为 True,并且文本框位于标注线的原点左侧, (标注指向) 的位置,在这种情况下,从文本框底部测量下降距离。

使用 CustomDrop 方法来设置此属性的值。

仅当标注具有显式设置的放置值(即 DropType 属性的值为 msoCalloutDropCustom 时),此属性的值才会准确反映标注行附件在文本框中的位置。

示例

本示例用一或两个预设的下沉替换 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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。