MultiUserEditing 属性

       

如果指定工作簿是以共享清单方式打开的,则该值为 TrueBoolean 类型,只读。

说明

若要以共享清单模式保存工作簿,请使用 SaveAs 方法。若要将工作簿访问方式从共享模式切换到独占模式,请使用 ExclusiveAccess 方法。

示例

本示例检查活动工作簿是否以独占模式打开。如果是则以共享清单方式保存该工作簿。

If Not ActiveWorkbook.MultiUserEditing Then
    ActiveWorkbook.SaveAs fileName:=ActiveWorkbook.FullName, _
        accessMode:=xlShared
End If