Word) (Version.Open 方法
開啟指定的文件版本。 會傳回代表開啟的文件的 Document 物件。
運算式。打開
需要 expression。 代表 'Version' 物件的變數。
文件
這個範例會開啟 Report.doc 的最新版本。
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
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。