ExclusiveAccess 方法

       

指定当前用户对共享清单中的工作簿进行独占访问。

expression.ExclusiveAccess

expression   必需。该表达式返回一个 Workbook 对象。

说明

ExclusiveAccess 方法保存对指定工作簿的任何更改,并要求其他打开该工作簿的用户将所作改变保存到另外的文件。

如果指定工作簿不是以共享清单形式打开,则本方法无效。要确定工作簿是否以共享清单方式打开,可对其 MultiUserEditing 属性进行检查。

示例

本示例检查活动工作簿是否以共享清单方式打开,如果是,则本示例设置当前用户以独占方式访问工作簿。

If ActiveWorkbook.MultiUserEditing Then
    ActiveWorkbook.ExclusiveAccess
End If