返回介绍

AutoAttach 属性

发布于 2019-10-04 14:08:32 字数 1276 浏览 1134 评论 0 收藏 0

根据标注线的原始位置(标注指向的位置)是在标注文本框的左边还是右边,决定标注线附加到标注文本框的位置。可读写。MsoTriState 类型。

MsoTriState 可以是下列 MsoTriState 类型常数之一。
msoCTrue
msoFalse
msoTriStateMixed
msoTriStateToggle
msoTrue标注线附加到标注文本框的位置,取决于标注线原始位置(标注指向的位置)是在标注文本框的左边还是右边。

说明

当该属性值为 msoTrue 时,如果文本框位于原始位置右侧,则下移值(从标注文本框的边界到标注线附加位置的垂直距离)从文本框顶部开始测量;如果文本框位于原始位置左侧,则下移值从文本框底部开始测量。当该属性值为msoFalse 时,下移值总是从文本框顶部开始测量,而不管文本框与原始位置的相对位置。使用CustomDrop 方法设置下移值,并使用Drop 属性返回下移值。

仅当明确设置下移值(即DropType 属性值为msoCalloutDropCustom)后,设置该属性才会影响标注。默认情况下,创建标注时已经明确设置了下移值。

示例

本示例为第一张幻灯片添加两个标注,其中一个是自动附加的,另一个则不是。如果将自动附加标注的标注行的原始位置改到附加的文本框的右侧,该文本框的位置就会发生变化。而对于非自动附加的标注则不会存在此现象。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
 With .AddCallout(msoCalloutTwo, 420, 170, 200, 50)
 .TextFrame.TextRange.Text = "auto-attached"
 .Callout.AutoAttach = msoTrue
 End With
 With .AddCallout(msoCalloutTwo, 420, 350, 200, 50)
 .TextFrame.TextRange.Text = "not auto-attached"
 .Callout.AutoAttach = msoFalse
 End With
End With

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文