ysmw.net
当前位置:首页 >> EXCEL VBA中忽略出错一行代码,继续向下执行的代码... >>

EXCEL VBA中忽略出错一行代码,继续向下执行的代码...

on error resume next

Sub 强行删除指定工作表() On Error Resume Next '忽略错误继续执行VBA代码,避免出现错误消息 Application.DisplayAlerts = False '禁用警告提示 Sheets("仓库").Delete Application.DisplayAlerts = True '恢复警告提示 End Sub

用On Error GoTo语句 在VBA帮助文档搜索 err 对象,即可 如果在错误处理过程里面,不想继续处理错误了,用on error goto 0 将返回通常的错误处理

Sub s() n = MsgBox("是否继续?", vbYesNo) If n = vbNo Then Exit Sub [A8] = "圣诞节"End Sub

如果不想暂停,就不要用msgbox函数。 想同步获得信息提示的话: 1)最简单的办法,设置状态栏文本 2)效果好些的方法:设计一个窗体,弹出,随事件进程更新其上某标签的caption属性

你定义的i是整形变量。。整形变量的取值范围是-32768到32767.。。 但是你的For i = 5 To Sheet1.Rows.Count 这句Sheet1.Rows.Count哪怕是EXECL2003都有65536.。。明显超出了32767,不溢出才有鬼了。。

sub delay(T as single) dim T1 as single t1=timer do doevents loop while timer-t1

你没选择一次,就会重复打开userform3,但是在userform3已打开的情况下,再打开,就会出错啊 可以在userform3.show前面加一行代码 unload userform3

On Error Resume Next CommandBars("单据录入").Delete On Error goto 0

第1问:在代码开始加一句 Application.DisplayAlerts = False代码结束后将此属性恢复为TRUE 第2问:除了使用者将宏安全性设置为最低,默认宏自动执行,否则,没有任何办法可以让宏自动解禁运行。如果VBA代码能自动解禁宏安全性,哪设置宏安全性...

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