PresetDrop 方法 - Microsoft Excel Visual Basic 2002 参考

返回介绍

PresetDrop 方法

发布于 2019-08-07 字数 1530 浏览 831 评论 0

表示标注线是连接在标注文本框的顶端、底端还是中心,或者表示标注线是连接在距标注文本框的顶端有一定距离的位置上,还是距底端有一定距离的位置上。


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

上一篇:Post 方法

下一篇:PresetGradient 方法

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!