怎么使用vba得到所有修订，批注信息

如何使用vba得到所有修订，批注信息？
如何使用vba得到所有修订，批注信息？
格式：操作人名，时间，信息。
谢谢了

[解决办法]
没弄出来，帮顶
[解决办法]

操作人名，
thisdocument.Revisions(1).Author

时间，
thisdocument.Revisions(1).Date

信息
thisdocument.Revisions(1).Range.Text

QQ群 48866293 OFFICE应用挖掘
MS OFFICE(ACCESS\EXCE\WORD等应用技术探讨与交流！技术群,请阅群论坛中的《踢人规则》
[解决办法]

引用Version 对象
参阅属性方法事件特性Versions
Version

代表文档的版本。Version 对象是 Versions 集合的一个成员。Versions 集合包含了指定文档的所有版本。

使用 Version 对象
可用 Versions(index) 返回一个 Version 对象，其中 index 为索引序号。索引序号代表 Versions 集合中版本的位置。Versions 集合中第一个版本的索引序号为 1，下列示例显示了活动文档中第一个版本的备注、作者及日期。

If ActiveDocument.Versions.Count >= 1 Then
With ActiveDocument.Versions(1)
MsgBox "Comment = " & .Comment & vbCr & "Author = " & _
.SavedBy & vbCr & "Date = " & .Date
End With
End If

可用 Save 方法在 Versions 集合中添加一个新项目。下列示例为具有指定备注的活动文档添加一个版本。

ActiveDocument.Versions.Save _
Comment:="incorporated Judy's revisions"

[解决办法]
学习之。。

怎么使用vba得到所有修订批注信息

热点推荐