Excel 错误处理未停止 Sheet Select 弹出窗口
Excel Error Handling not Stopping Sheet Select Pop-Up
我创建了一个函数来检查 sheet 是否存在于 外部 工作簿中。代码如下(我已经检查过这个并且它与其他 sheets 完美配合,注释掉引用这个的 If
语句停止错误):
Function ExtSheetExists(formString) As Boolean
Dim val As Variant
On Error Resume Next
val = ExecuteExcel4Macro(formString)
ExtSheetExists = (val <> Error(2023))
On Error GoTo 0
End Function
注意:FormString
作为 "'" & wkBookRef1 & firstShtName & "'!" & "R6C12"
传递,其中 wkBookRef1
只是传播的路径 sheet 而 firstShtName
是传播 sheet 正在查找的名称。
但是稍后当我使用 UpdateLink
方法更新相同的传播sheet 时,它会弹出 Select Sheet 对话框,从而停止 运行 的宏。有人知道这里发生了什么吗?
selectsheet方框如下:
这是一个错误。实际上 formstring
是 运行 并且消息框被抑制。然而,它似乎仍然是另一个电子表格中的潜在过程。所以当它更新时,它会显示被抑制的消息框。
我创建了一个函数来检查 sheet 是否存在于 外部 工作簿中。代码如下(我已经检查过这个并且它与其他 sheets 完美配合,注释掉引用这个的 If
语句停止错误):
Function ExtSheetExists(formString) As Boolean
Dim val As Variant
On Error Resume Next
val = ExecuteExcel4Macro(formString)
ExtSheetExists = (val <> Error(2023))
On Error GoTo 0
End Function
注意:FormString
作为 "'" & wkBookRef1 & firstShtName & "'!" & "R6C12"
传递,其中 wkBookRef1
只是传播的路径 sheet 而 firstShtName
是传播 sheet 正在查找的名称。
但是稍后当我使用 UpdateLink
方法更新相同的传播sheet 时,它会弹出 Select Sheet 对话框,从而停止 运行 的宏。有人知道这里发生了什么吗?
selectsheet方框如下:
这是一个错误。实际上 formstring
是 运行 并且消息框被抑制。然而,它似乎仍然是另一个电子表格中的潜在过程。所以当它更新时,它会显示被抑制的消息框。