Excel VBA 报错机制之跳出整个程序

2016-01-16 20:53 阅读 91 次 评论关闭

如果Excel VBA程序中要调用窗体界面中的某个文本框数据,而用户却未输入数据,那么执行这个程序必然会出错,而这个报错是要直接跳到VB编辑后台的。这会给用户不好的体验,甚至可以说这个Excel VBA编程并未成功。

这时,我们就要建立一个Excel VBA的报错机制。功能需求,希望用户未输入窗体界面中的某个文本框数据时,跳出窗体,请输入数据。实现代码如下:

If TextBox1.Value = "" Then
MsgBox ("请输入数据")
End If

这组代码虽然实现了Excel VBA报错的前台提醒,但是如何这组Excel VBA程度后还需要调用TextBox1.Value时是会再次报错,从而跳转到VB编辑后台的。这时我们需要添加退出整个程序的命令,实现代码如下:

If TextBox1.Value = "" Then
MsgBox ("请输入数据")
Exit Sub '这是退出整个程序
End If

版权声明:本文著作权归原作者所有,欢迎分享本文,谢谢支持!
转载请注明:Excel VBA 报错机制之跳出整个程序 | 猎微网

评论已关闭!