Свойство Version.Date (Word)
Дата и время сохранения версии документа. Дата только для чтения.
выражение. Date
Выражение Переменная, представляющая объект Version.
В этом примере отображаются дата и время сохранения последней версии активного документа.
Dim docActive As Document
Set docActive = ActiveDocument
If docActive.Path <> "" Then MsgBox _
docActive.Versions(docActive.Versions.Count).Date
В этом примере отображаются дата и время следующего отслеживаемого изменения, обнаруженного в активном документе.
Dim revTemp As Revision
If ActiveDocument.Revisions.Count >= 1 Then
Set revTemp = Selection.NextRevision
If Not (revTemp Is Nothing) Then MsgBox revTemp.Date
End If
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.