Объект Version (Word)
Представляет отдельную версию документа. Объект Version является членом коллекции Versions . Коллекция Versions включает все версии указанного документа.
Используйте versions (Index), где Index — это номер индекса, чтобы вернуть один объект Version . Номер индекса представляет позицию версии в коллекции Versions . Первая версия, добавленная в коллекцию Versions , — индекс no 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"
Справочник по объектной модели Word
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.