Sync.OpenVersion 方法 (Office)
在当前打开的本地版本旁打开共享文档的另一个版本。
注意
自 Microsoft Office 2010 开始,此对象或成员已弃用,不应再行使用。
语法
表达式。OpenVersion (SyncVersionType)
表达 一个代表 Sync 对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
SyncVersionType | 必需 | MsoSyncVersionType | 代表版本的类型。 |
备注
使用 OpenVersion 方法打开 (msoSyncVersionLastViewed) 查看的最后一个版本,或者打开 (msoSyncVersionServer) 共享文档的服务器副本以及当前打开的本地版本。
msoSyncVersionLastViewed 选项显示每当用户使用服务器副本覆盖本地副本时创建的文档副本。 例如,如果使用 msoSyncConflictServerWins 选项调用 ResolveConflict 方法,则会保存本地更改,并且可以通过调用 OpenVersion (msoSyncVersionLastViewed) 查看本地更改。
不是所有文档同步问题都会引发可捕获的运行时错误。 使用 Sync 对象执行操作后,最好检查 Status 属性;如果 Status 属性为 msoSyncStatusError,请检查 ErrorType 属性,了解有关已发生的错误类型的其他信息。
示例
下面的示例将提示用户在当前打开的共享文档本地版本旁打开该文档的服务器副本。
Dim objSync As Office.Sync
Dim lngChoice As VbMsgBoxResult
Set objSync = ActiveDocument.Sync
lngChoice = MsgBox("View server copy?", _
vbQuestion + vbOKCancel, "Open Server Version?")
If lngChoice = vbOK Then
objSync.OpenVersion msoSyncVersionServer
End If
Set objSync = Nothing
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈