Excel VBA教程:DropType属性

返回表示标注线与标注文本框的连接位置的值。MsoCalloutDropType 类型,只读。

MsoCalloutDropType 可为以下 MsoCalloutDropType 常量之一。
msoCalloutDropCenter
msoCalloutDropMixed
msoCalloutDropBottom
msoCalloutDropCustom
msoCalloutDropTop

expression.DropType

expression   必需。该表达式返回“应用于”列表中的对象之一。

说明

如果标注的垂直线类型为 msoCalloutDropCustom,则Drop属性和AutoAttach属性的值,以及标注文本框和标注线起点(标注所指向的位置)的相对位置将用于决定标注线与标注文本框的连接位置。

本属性只读。可用PresetDrop方法设置本属性的值。

示例

本示例根据自定义的垂直距离值是大于还是小于标注文本框高度的一半,将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

上页:Excel VBA教程:DropLines属性 下页:Excel VBA教程:EditDirectlyInCell属性

Excel VBA教程:DropType属性

Excel VBA教程:EditDirectlyInCell属性 Excel VBA教程:EditingType属性
Excel VBA教程:EditWebPage属性 Excel VBA教程:Elevation属性
Excel VBA教程:EmailSubject属性 Excel VBA教程:EmbedSmartTags属性
Excel VBA教程:EmptyCellReferences属性 Excel VBA教程:EnableAnimations属性
Excel VBA教程:EnableAutoComplete属性 Excel VBA教程:EnableAutoFilter属性
Excel VBA教程:EnableAutoRecover属性 Excel VBA教程:EnableCalculation属性
Excel VBA教程:EnableCancelKey属性 Excel VBA教程:Enabled属性
Excel VBA教程:EnableDataValueEditing属性 Excel VBA教程:EnableDrilldown属性
Excel VBA教程:EnableEditing属性 Excel VBA教程:EnableEvents属性
Excel VBA教程:EnableFieldDialog属性 Excel VBA教程:EnableFieldList属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号