Excel自定义关闭按钮实现代码
遇到过这样一个需求,是在excel关闭的时候,不要excel本身的保存窗口,只用自定义的.
这个的需要第一,是点击关闭时候触发,
第二;触发后,不能还是弹出那个窗口
第三:取消后,要能停止程序
为了弄这个摸索了很久,最后总算通过结合,找出了解决办法:
先执行
PrivateSubWorkbook_BeforeClose(CancelAsBoolean)
IfC_Msg.PostA("Com_Err023",,True,1)=vbOKThen
DimxxxAsString
xxx="Yes"
Cancel=False
Else
DimsssAsString
sss="No"
Cancel=True
EndIf
EndSub
再执行
SubAuto_Close() ThisWorkbook.Saved=True IfApplication.Workbooks.Count=1Then Application.Quit EndIf 'ThisWorkbook.CloseFalse EndSub
以上就是本文的全部内容,希望对大家的学习有所帮助,也希望大家多多支持毛票票。
热门推荐
1 训练狗狗基础
2 怎么训练狗狗笑
3 怎么训练狗狗卧下
4 上海狗狗训练基地
5 训练狗狗排便
6 狗狗基础训练
8 如何训练狗狗装死
9 狗狗站姿训练
10 狗狗训练用品
11 训练狗狗吧
12 狗狗要怎么训练
13 怎么训练狗狗玩球
14 训练狗狗唤回
15 狗狗训练躺下
16 狗狗训练指令
17 狗狗的训练技巧
18 狗狗不好训练