返回介绍

AddComment 方法

发布于 2019-10-04 14:06:53 字数 734 浏览 1073 评论 0 收藏 0

添加一个批注。返回一个代表新批注的Shape 对象。

expression.AddComment(Left,Top,Width,Height)

expression必选。该表达式返回一个Shapes 对象。

LeftTop可选。Single 类型。批注边界框左上角相对于文档左上角的位置(以磅为单位)。默认情况下,批注位于文档的左上角。

WidthHeight可选。Single 类型。批注的高度和宽度,以磅为单位。默认情况下,批注的高和宽均为 100 磅。

示例

本示例向myDocument 中添加包含文本“Test Comment”的批注。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddComment(100, 100, 150, 150)
 .TextFrame.TextRange.Text = .TextFrame _
 .TextRange.Text + "Test Comment"
End With

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

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

发布评论

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