[英]Excel Error Handling not Stopping Sheet Select Pop-Up
我創建了一個檢查外部工作簿中是否存在工作表的函數。 代碼如下(我已經檢查了這一點,並且可以與其他工作表完美配合,注釋掉引用了此內容的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 & firstShtName & "'!" & "R6C12"
,其中wkBookRef1
只是電子表格的路徑,而firstShtName
是要查找的電子表格名稱。
但是,稍后當我使用UpdateLink
方法更新同一電子表格時,它將彈出“選擇工作表”對話框,從而停止運行宏。 有人對這里發生的事情有什么了解嗎?
選擇工作表框如下:
這是一個錯誤。 有效地運行formstring
並取消顯示消息框。 但是,似乎在另一個電子表格中它仍然是一個潛在的過程。 因此,更新后會顯示禁止顯示的消息框。
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.