Excel废料表

Question

我是excel vba的新手。我有这个问题：

我希望excel检查项目的可用性@ www.bgstechnic.com/availability

例如“1195”

我写了这个vba：

Sub ImportMyData()

    Dim IE As New InternetExplorer

    IE.Visible = False
    IE.navigate "http://www.bgstechnic.com/availability?processed&F1244467957750MNRHTT=_"

    Do
        DoEvents
    Loop Until IE.readyState = READYSTATE_COMPLETE

    IE.document.getElementById("item-numbers").Value = "1195"

    Set goBtn = IE.document.getElementById("bgs-submit")
    goBtn.Click

    Do
        DoEvents
    Loop Until IE.readyState = READYSTATE_COMPLETE

    Dim sdd As String
    sdd = IE.document.getElementById("availability-results").innerText

    MsgBox sdd

End Sub

我的问题是，我只需要在excel中插入“库存中的物品，超过50件。可用”，但我无法找到ID这个子表（？）

有人能帮帮我吗？

Answer 1

您必须按类名向下钻取更远的距离。试试这个：

sdd = IE.Document.getElementsByClassName("availability-desc")(0).innerText

这将从可用性列返回行（0）的描述。这应该有用，但是（免责声明）由于一些＃！@＃！#IE问题我没有尝试过;）