- 帖子
- 109
- 主題
- 2
- 精華
- 0
- 積分
- 114
- 點名
- 0
- 作業系統
- Win7 Win10
- 軟體版本
- Office 2019 WPS
- 閱讀權限
- 20
- 性別
- 男
- 來自
- 深圳
- 註冊時間
- 2013-2-2
- 最後登錄
- 2024-11-6
|
给你两种方式:
一、添加一个新的Sub,代码如下:- Sub Test()
- Application.EnableEvents = False
- End Sub
複製代碼 然后运行Test这个过程后,再删除上面的代码,然后存盘。
二、使用断点测试:
鼠标点击Workbook_BeforeSave过程的第一行代码,使用光标在此行闪烁,然后按F9在此行下断点(此行前面有个红点);再在Workbook_BeforeClose过程的第一行代码- If Closeflag = False Then
複製代碼 处下断点(方法同上),点击保存,这时断点处代码会被加黄底,拖动代码前面的黄色箭头,拉到End Sub(这时End Sub 这行变成黄底),而后按F5运行,这行就可以保存了。 |
|