使标注线的第一条线段(即与标注文本框相连的线段)在标注移动时自动调整长短。可用 CustomLength 方法使标注线第一条线段的长度在标注移动时,保持由 Length 属性所指定的值不变。仅适用于标注线由若干线段组成的标注(msoCalloutThree 类型和 msoCalloutFour 类型)。
expression.AutomaticLength
expression 必需。该表达式返回一个 CalloutFormat 对象。
应用本方法将 AutoLength 属性设置为 True。
本示例判断 myDocument
上第一个图形的标注线,如果其第一段是自动调整长度的,就将其转换为固定长度的;而如果第一段是固定长度的,就将其转换为自动调整长度的。为使本示例正常运行,第一个图形必须是标注.
Set myDocument = Worksheets(1)
With myDocument.Shapes(1).Callout
If .AutoLength Then
.CustomLength 50
Else
.AutomaticLength
End If
End With