Question

EXCEL VBA编程的问题: 我用命令禁用了EXCEL本身的保存按钮,但设定的窗体保存按钮也被禁用了,如何解决?

事件响应 beforesave过程中设置CANCEL=TRUE,即可禁用保存和另存为功能,但我设计了一个窗体按钮,用SAVEAS命令按指定文件名保存的功能现在也被禁用了,在窗体按钮代码中再设置CANCEL=FALSE也不起作用了,请问高手如何解决这个问题?
事件响应过程与窗体代码过程是两个过程,我想可能的解决方案是如何实现在两个过程中参数传递的问题

Answer 1

'在模块中声明全局变量，通过窗体中控制全局变量的值来执行你需要的功能！

Dim 全局变量 As Boolean
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If 全局变量 = True Then
Cancel = False
Else
Cancel = True
End If
End Sub