返回介绍

Revisions 集合对象

发布于 2019-09-29 09:51:37 字数 1261 浏览 983 评论 0 收藏 0

多种对象
Revisions (Revision)
Range

一个由 Revision 对象组成的集合,这些对象代表文档或范围中标有修订标记的变化。

使用 Revisions 集合

可用 Revisions 属性返回 Revisions 集合。下例显示主文本中修订内容的数目。

MsgBox ActiveDocument.Revisions.Count

下例接受所选内容的所有修订。

For Each myRev In Selection.Range.Revisions
 myRev.Accept
Next myRev

下例接受所选内容第一段中的所有修订。

Set myRange = Selection.Paragraphs(1).Range
myRange.Revisions.AcceptAll

Add 方法在 Revisions 集合中无效。修订开始时添加 Revision 对象。可将 TrackRevisions 属性设置为 True 以跟踪文档中所作的修订。下例在活动文档中打开修订跟踪功能并在所选内容之前插入“The”。

ActiveDocument.TrackRevisions = True
Selection.InsertBefore "The "

用 Revisions(index) 返回一个 Revision 对象,其中index 为索引号。索引号代表修订内容在范围或文档中的位置。下例显示了第一个所选内容中第一个修订内容的作者姓名。

MsgBox ActiveDocument.Sections(1).Range.Revisions(1).Author

说明

文档中该集合的 Count 属性仅返回正文部分的项目数。使用集合的 Range 对象可计算其他部分的项目数。

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

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

发布评论

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