表示标注线是连接在标注文本框的顶端、底端还是中心,或者表示标注线是连接在距标注文本框的顶端有一定距离的位置上,还是距底端有一定距离的位置上。
expression.PresetDrop(DropType)
expression 必需。该表达式返回“应用于”列表中的一个对象。
DropType MsoCalloutDropType 类型,必需。标注线的起点相对于文本框的位置。
MsoCalloutDropType 可为以下 MsoCalloutDropType 常量之一。 |
msoCalloutDropBottom |
msoCalloutDropCenter |
msoCalloutDropCustom Specifying msoCalloutDropCustom for this argument will cause your code to fail. |
msoCalloutDropMixed |
msoCalloutDropTop |
本示例使 myDocument
中第一个图形的标注线连接到标注文本框的顶端。为使本示例正常运行,第一个图形必须是标注。
Set myDocument = Worksheets(1)
myDocument.Shapes(1).Callout.PresetDrop msoCalloutDropTop
This example toggles between two preset drops for shape one on myDocument
中第一个图形的预置标注线落差类型。为使本示例正常运行,第一个图形必须是标注。
Set myDocument = Worksheets(1)
With myDocument.Shapes(1).Callout
If .DropType = msoCalloutDropTop Then
.PresetDrop msoCalloutDropBottom
ElseIf .DropType = msoCalloutDropBottom Then
.PresetDrop msoCalloutDropTop
End If
End With