Version 对象

Documents (Document) 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"