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