vba - On error resume next 不适用于 IE 自动化

Question

我正在尝试从某些网页（公司拥有）获取数据，我曾经使用 Getelementsbyid 方法从网站返回值

问题是如果特定元素有数据，宏会从该页面获取数据，否则它会引发错误，我尝试了错误恢复下一步，如果特定元素没有任何数据，则错误处理程序方法跳过错误..

Elementid = ctl00_conMainPageContent_lblGeneralNotesData

实际上它的标签框..主要是它有一些数据有时可能没有

Code :

on error resume next

Sheets("AVS").Range("I" & lRow + 1).Value =ie.Document.getElementById("ctl00_conMainPageContent_lblGeneralNotesData").Value

如果有人在这方面帮助我，那就太好了..我希望我的解释有点清楚

Answer 1

就像是

Dim var As Variant
On Error resume Next
var = ie.Document.getElementById("ctl00_conMainPageContent_lblGeneralNotesData").Value

If Len(var) > 0 then
    Sheets("AVS").Range("I" & lRow + 1).Value = var 
Else
    'nothing in there
    On Error GoTo 0
    Exit Sub/Function 
End If
On Error GoTo 0

Answer 2

或尝试在 VBE 中的类模块中设置中断 (Tool\Options\General)