VBA來處理錯誤

Question

我要處理的假設條件VBA錯誤對於我下面的代碼的問題是，當我寫在錯誤恢復下一頁它處理錯誤，但與下一條語句繼續只爲條件， 但我要跳到下一個for循環

我的代碼： -

On Error GoTo 0 
On Error Resume Next 
For intRow = 2 To intLastRow 

    If selenium.getText("//form[@id='searchForm']/div[3]/div/div/table/tbody/tr[1]/td[5]") = DOS Then 

    clmn = selenium.getText("//form[@id='searchForm']/div[3]/div/div/table/tbody/tr[1]/td[2]") 
    selenium.findElementByLinkText(clmn).Click 
    FileNo = FileNo + 1 
    Worksheets("Input").Cells(intRow, 9).Value = FileNo 

    End If 

Next intRow 

Answer 1

你可以告訴它跳轉到製造商的錯誤：

On Error GoTo errFound 
For intRow = 2 To intLastRow 
    If selenium.GetText("//form[@id='searchForm']/div[3]/div/div/table/tbody/tr[1]/td[5]") = DOS Then 
     clmn = selenium.GetText("//form[@id='searchForm']/div[3]/div/div/table/tbody/tr[1]/td[2]") 
     selenium.findElementByLinkText(clmn).Click 
     FileNo = FileNo + 1 
     Worksheets("Input").Cells(intRow, 9).Value = FileNo 
    End If 
errFound: 
Next intRow 

但是，我會在那裏放一些if語句來嘗試處理錯誤，而不是僅僅跳過它們，