Excel VBA教程:AutoAttach属性

如果标注线与标注文本框的连接位置,是根据标注线的起点(即标注所指向的点)与标注文本框的相对位置自动决定的,则该值为 True。MsoTriState 类型,可读写。

MsoTriState 可为以下 MsoTriState 常量之一。
msoCTrue
msoFalse
msoTriStateMixed
msoTriStateToggle
msoTrue 标注线与标注文本框的连接位置,是根据标注线的起点(即标注所指向的点)与标注文本框的相对位置自动决定的。

说明

如果本属性的值为 True,那么当标注文本框位于标注线起点的右边时,标注的落差值(标注文本框的边框与标注线所指向的位置之间的垂直距离)从标注文本框的顶边开始计算,而当标注文本框位于标注线起点的左边时,落差值从标注文本框的底边开始计算。如果本属性的值为 False,那么不管标注文本框与标注线起点的相对位置怎样,标注的落差值都从标注文本框的顶边开始计算。可用CustomDrop方法设置落差值,而用Drop属性返回落差值。

对本属性的更改,只影响显式地设置落差值的标注,即只影响DropType属性为 msoCalloutDropCustom 的标注。默认情况下,在创建时标注的落差值就是显式地设置的。

Excel VBA教程:AutoAttach属性·示例

本示例向myDocument 中添加了两个标注。如果将这两个标注的文本框拖到其起点的左边,那么只有自动调整连接点的标注才会改变标注线与文本框的连接点。


Set myDocument = Worksheets(1)
With myDocument.Shapes
    With .AddCallout(msoCalloutTwo, 420, 170, 200, 50)
        .TextFrame.Characters.Text = "auto-attached"
        .Callout.AutoAttach = True
    End With
    With .AddCallout(msoCalloutTwo, 420, 350, 200, 50)
        .TextFrame.Characters.Text = "not auto-attached"
        .Callout.AutoAttach = False
    End With
End With

上页:Excel VBA教程:Author属性 下页:Excel VBA教程:AutoCorrect属性

Excel VBA教程:AutoAttach属性

Excel VBA教程:AutoCorrect属性 Excel VBA教程:AutoFilter属性
Excel VBA教程:AutoFilterMode属性 Excel VBA教程:AutoFormat属性
Excel VBA教程:AutoFormatAsYouTypeReplaceHyperlinks属性 Excel VBA教程:AutoLayout属性
Excel VBA教程:AutoLength属性 Excel VBA教程:AutoLoad属性
Excel VBA教程:AutoMargins属性 Excel VBA教程:AutomaticStyles属性
Excel VBA教程:AutomationSecurity属性 Excel VBA教程:AutoPercentEntry属性
Excel VBA教程:AutoRecover属性 Excel VBA教程:AutoRepublish属性
Excel VBA教程:AutoScaleFont属性 Excel VBA教程:AutoScaling属性
Excel VBA教程:AutoShapeType属性 Excel VBA教程:AutoShowCount属性
Excel VBA教程:AutoShowField属性 Excel VBA教程:AutoShowRange属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号