共享的excel如何禁止使用另存为

把共享文件的属性里选择共享，然后在“允许网络用户更改我的文件”打勾，就可以在别的机子上修改并保存了

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Environ("Cumputername") <> "me" Then
MsgBox "您不能保存"
Cancel = True
End If
End Sub

上面那个Me是你自已在局哉网中的计算机名字，设置条件，只要不等于这个名称的电脑打开了你的EXCEL表，就不能保存。 但是别人可以复制呀~~~

按我理解，你的意思是不想别人保存你的文件甚至复制等动作？

在工具——保护——保护工作表，设置密码，把“允许....进行”下面的选框全部去掉，保存。

好像没有办法，共享的东西，只要别人能打开，看到。就难以加以限制。