VBA 禁止保存
2015-09-06 11:20
288 查看
禁止保存
在workbook事件中
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Saved =
True
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Cancel = True
End Sub
'如果修改了程序要保持：
'在BeforeSave中的End
Sub设置断点，对BeforeSave中的Cancel添加监视，
'然后在保存时在监视窗口中直接修改Cancel的值为False
在workbook事件中
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Saved =
True
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Cancel = True
End Sub
'如果修改了程序要保持：
'在BeforeSave中的End
Sub设置断点，对BeforeSave中的Cancel添加监视，
'然后在保存时在监视窗口中直接修改Cancel的值为False
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- VBA 打开带密码的文件
- VBA 调用DLL动态链接库
- VB 调用动态链接库
- VBA 连接文本的自定义函数（可用于数组公式）
- VBA 定义能返回数组公式的自定义函数
- VBA 判断单元格是否为公式，可用于数组
- VB6 创建控制台应用程序
- VB6 让程序结束后带有返回值
- VB6 实现命令行调用时附着到原控制台
- VB6 如何创建一个标准控制台程序
- VBA 操作 VBE
- VBA 检查模块中是否有某个函数
- 用VB6.0实现串口通信
- vb6 的关机代码
- vba截屏保存
- VB.Net条形码编程的方法
- VB.NET条码机打印设置纸张大小的方法
- VBS中Sendkey键盘对应的码表
- VB.Net与C# 的语法比较
- VB.NET 指针