使用vba excel单击网页jquery按钮答案

【问题标题】：Click web page jquery button using vba excel使用vba excel单击网页jquery按钮
【发布时间】：2017-06-07 14:49:54
【问题描述】：

我的 vba excel 代码需要一些帮助：

    Set ieDoc = Nothing
    Set ieDoc = ieApp.Document
    For Each Anchor In ieDoc.getElementsByTagName("div")
         If InStr(Anchor.outerHTML, "CategoryIDName-popup") > 0 Then
            Anchor.Focus
            SendKeys "{DOWN}"
            SendKeys "{ENTER}"
            Anchor.Click
            Anchor.FireEvent "ondblclick", 1, 2
            Exit For
         End If
     Next Anchor

我已经尝试过 sendkeys、click 甚至 ondblclick，但没有任何效果。这是html代码：

任何帮助，非常感谢。

【问题讨论】：

标签： jquery excel webpage vba

【解决方案1】：

试试这个：

ieDoc.getElementById("CategoryIDName-popup").FireEvent "onmouseover"
ieDoc.getElementById("CategoryIDName-popup").FireEvent "onmousedown"
ieDoc.getElementById("CategoryIDName-popup").FireEvent "onmouseup"

【讨论】：