Click web page jquery button using vba excel

Question

I need some help with my vba excel code:

    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

I've already tried sendkeys, click, or even ondblclick, but nothing is working. Here is the html code:

< DIV id=CategoryIDName-popup class="input-group-addon btn" tabIndex=1 jQuery111308417279745872946="287"> < I class="fa fa-search"< /I> < /DIV>

Any help, really appreciated.

groenhen · Accepted Answer · 2017-05-23 17:27:46Z

0

Try this :

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

edited May 23, 2017 at 17:27

groenhen

3,02725 gold badges51 silver badges69 bronze badges

answered May 23, 2017 at 16:07

birkhoff

1

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Click web page jquery button using vba excel

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related