VBA如何捕获异常? 用 On Error GoTo语句可以捕获异常。具体做法:1.在需要捕获异常的过程开始处写语句:On Error GoTo ErrL 'ErrL为语句标号2.在该过程结束语句(End Sub)之前安排如下代码:GoTo EndOkErrL:'此处为异常处理代码EndOk:这时,整个过程的代码结构为:Sub XX()On Error GoTo ErrL'.GoTo EndOkErrL:'此处为异常处理代码EndOk:End Sub
Excel vba Workbooks.Open打开excel文件时excel卡死 通常情况下,我们应该避开重复打开文件,如果你略懂VBA,请使用下面代码测试:将你的WOrkBooks.Open(\"D:\\xx.xls\")改成如下:Dim Wb as WorkBook '定义一个wb工作簿变量On Error Resume Next '容错Set wb=WOrkbooks(\"xx.xls\")'先引用xx.xls工作簿,如果该工作簿没有打开,那么将发生错误9;如果已经打开,将跳过下面这句打开工作簿的代码!If Err.Number=9 Then Set wb=WorkBooks.Open(\"D:\\xx.xls\")'捕获错误9,打开相关工作簿
excel vba create table as语名显示语法错误 Dim cnn As New ADODB.Connection Dim rst As New ADODB.Recordset Dim SQL As String SQL=create table a as select*from b 。