VBA：简单一招，禁用工作簿【另存为】功能

1、工作中，对于某些重要的文件，为防止保存的版本混乱，要求文件只能保存为一个文件名，此时可禁用这个工作簿【另存为】功能，实现目标。

2、需要借用Workbook的”BeforeSave“事件，判断用户是否触发了【另存为】功能 ，通过”SaveAsUI“参数值判断。

3、具体的代码如下：

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

    If SaveAsUI = True Then Cancel = True

End Sub

代码解析：

1、If SaveAsUI = True ，那么保存的动作就中断，即Cancel = True跳出保存这个动作