Clase Version - versión (Word VBA)

La clase Version representa una única versión de un documento. Para usar una variable de clase Version, primero debe ser instanciado, por ejemplo

Comment

Devuelve el comentario asociado a la versión especificada de un documento.


If ActiveDocument.Versions.Count >= 1 Then 
 MsgBox Prompt:=ActiveDocument.Versions(1).Comment, _ 
 Title:="First Version Comment" 
End If

Date

La fecha y hora en que se guardó la versión del documento.


Dim docActive As Document 
 
Set docActive = ActiveDocument 

Delete

Elimina la versión especificada.


Dim vrs As Version: Set vrs =  
vrs.Delete

Index

Devuelve un valor de tipo Long que representa la posición de un elemento en una colección.


Dim vrs As Version: Set vrs =  
Dim lngIndex As Long
lngIndex = vrs.Index

Open

Abre la versión especificada de un documento.


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

Devuelve el nombre del usuario que guardó la versión especificada del documento.


If ActiveDocument.Versions.Count >= 1 Then 
 MsgBox ActiveDocument.Versions(1).SavedBy 
End If