lzth.net
当前位置:首页 >> BEForEClosE >>

BEForEClosE

看你的这个语句: Case IsNumeric(Cells(I, 12)) 这个始终是判断当前工作表,你应该修改为: Case IsNumeric(Worksheets("01").Cells(I, 12)) 下面三个表类似的处理。

可以的吧! 要看你具体的Excel文档,不好妄自揣测。(如果不方便可以根据实际情况模拟数据)

目测 c d 可能是

Workbooks(name1).Close SaveChanges:=False '关闭指定name1 ThisWorkbook.Close SaveChanges:=False '关闭指定工作薄 ActiveWorkbook.Close SaveChanges:=False '关闭当前活动工作薄

不在 Workbook_BeforeClose 事件写程序,而是在添加专属的工具栏时,把它设置为临时的。下面时在 帮助中复制的相关内容,以做参考: Add方法应用于 CommandBars 对象的情形。 新建一个命令栏并添加到命令栏集合。返回 CommandBar 对象。 express...

这个你看看你的js代码有没有问题,window.confirm是看返回值是否为true才会继续执行你的代码的。

网页链接不是很明白你说的,但是你可以看一下这个网址里面的东西,是否有帮助

Dim closeflag As BooleanPrivate Sub workbook_beforeclose(cancel As Boolean)If closeflag = False Thencancel = TrueMsgBox "此功能已经被禁止", vbExclamation,...

去论坛问一下吧!

onBeforeClose事件,不是onClose onClose是已经关闭了 onBeforeClose 返回false ,取消关闭操作。 1 2 3 4 5 6 7 8 9 10 11 $('#tt').tabs({ onBeforeClose: function(title,index){ var target = this; $.messager.confirm('确认','你确认想要关...

网站首页 | 网站地图
All rights reserved Powered by www.lzth.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com