Classe Version - version (Word VBA)
La classe Version représente une version unique d'un document. Pour utiliser une variable de classe Version, elle doit d'abord être instanciée, par exemple
Comment
Renvoie le commentaire associé à la version spécifiée d'un document.
If ActiveDocument.Versions.Count >= 1 Then
MsgBox Prompt:=ActiveDocument.Versions(1).Comment, _
Title:="First Version Comment"
End If
Date
Date et heure auxquelles la version du document a été enregistrée.
Dim docActive As Document
Set docActive = ActiveDocument
Delete
Supprime la version spécifiée.
Dim vrs As Version: Set vrs =
vrs.Delete
Index
Renvoie un type long qui représente la position d’un élément dans une collection.
Dim vrs As Version: Set vrs =
Dim lngIndex As Long
lngIndex = vrs.Index
Open
Ouvre la version spécifiée d'un document.
Sub OpenVersion()
Dim mydoc As Document
Set mydoc = Documents.Open("C:\MyFiles\Report.doc")
If mydoc.Versions.Count > 0 Then
mydoc.Versions(mydoc.Versions.Count).Open
Else
MsgBox "There are no saved versions for this document."
End If
End Sub
SavedBy
Renvoie le nom de l'utilisateur qui a enregistré la version spécifiée du document.
If ActiveDocument.Versions.Count >= 1 Then
MsgBox ActiveDocument.Versions(1).SavedBy
End If