Excel。使用vba记录某人何时删除共享功能

Question

我们在工作中遇到问题。我不知道这是由于个人还是系统管理员在工作时间使用补丁，但是......我们在工作中使用Excel工作表来跟踪工程工作。这是一本共享的工作手册，可以让多人随时工作，并且工作良好。最近人们一直在失去工作，因为在白天有些东西会从文件中删除共享状态。只有当人们去保存他们的工作或在午餐后再次打开工作簿时才会发现。是否可以编写一个记录何时应用或删除共享功能的宏。我认为它是工作簿集合/对象的属性，但不能看到如何从文档中执行此操作。

Answer 1

看一下Workbook.MultiUserEditing属性。

如果工作簿当前不处于共享模式，此代码片段（from Microsoft help）会将工作簿保存为共享模式。

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

您可以考虑在Workbook_BeforeClose()事件或其他相关事件将这段代码（或类似）。