例如:
有一個文件:
這個方法可以自己在代碼中擴展需要限制用戶關(guān)閉的一些條件,很有用處哦,
下面我們來看一下具體的代碼:
在工作簿關(guān)閉前的事件中放入如上代碼:
If Not 是否關(guān)閉 Then '是否關(guān)閉 為全局變量, 默認為 False
Cancel = True '如果不允許關(guān)閉, 則取消關(guān)閉
End If
是否關(guān)閉 = False '再次設(shè)置不允許關(guān)閉文件
另外在模塊中放入如下代碼:
圖片 X 指定宏: 到該代碼
是否關(guān)閉 = True '允許關(guān)閉
ThisWorkbook.Save '保存文件
ThisWorkbook.Close '關(guān)閉文件
本代碼通過工作簿的事件和模塊來改寫關(guān)閉工作簿
本代碼可收藏到代碼助手,并且快速搜索隨時調(diào)出
代碼助手下載地址vbayyds.com
輸入 是否+空格,即可快速調(diào)出代碼
大家趕緊實際操作練習(xí)一下吧。