VBA仅使用Onlick单击Internet Explorer [关闭]答案

【问题标题】：VBA to click Internet Explorer with ONLY Onlick [closed]VBA仅使用Onlick单击Internet Explorer [关闭]
【发布时间】：2018-12-19 07:50:06
【问题描述】：

因为不工作？请帮我！ :(

HTML CODE

Dim i As Long 

Dim IE As Object

Dim Doc As Object

Dim objElement As Object

Dim objCollection As Object

Dim buttonCollection As Object

Dim valeur_heure As Object


' Create InternetExplorer Object

Set IE = CreateObject("InternetExplorer.Application")

' You can uncoment Next line To see form results

IE.Visible = True

' Send the form data To URL As POST binary request

IE.Navigate "http://Mysite/Home/"

Dim elements As Object, element As Object

For Each element In IE.Document.getElementsByTagName("img")

    If element.innertext = "r/std/icons/combi64.png" Then
         element.Focus
        element.Click
        Exit For
    End If

Next

  Set IE = Nothing

【问题讨论】：

1) 请正确格式化和编辑您的代码 2) 将 HTML 插入为 sn-p 而不是图像（使用提供的工具） 3) 使您的问题清晰明了 4) 描述 的作用t work 的意思。错误信息？这些是什么？哪几行？你尝试了什么？
据我所知，您也没有发送 POST 二进制请求。而且我在提供的图片中看不到 r/std/icons/combi64.png。
作为新手使用tour 并阅读有关Asking 的信息。

标签： html vba ms-access web-scraping onclick

【解决方案1】：

我的意思很简单

IE.Navigate "http://Mysite/Home/"
While IE.Busy Or IE.readyState < 4: DoEvents: Wend
IE.Document.getElementsByClassName("tbi")(1).Click

它是一个单一的元素。不需要 For 循环。没有 innerText 检查。如上图所示。请注意，您还需要等待页面加载；为此，我添加了While IE.Busy Or IE.readyState < 4: DoEvents: Wend。

点击图标然后

IE.Document.querySelector("img[src='r/std/icons/combi64.png']").Click

但我不确定该图标是否可点击。

【讨论】：

我使用您的代码，但不起作用。看图错误。我还使用一个断点来等待页面加载。
试试上面的 E.Document.getElementsByClassName("tbi")(1).Click 。请了解如何使用问题下方的编辑关键字将信息编辑到您的问题中。失败的只是 IE.Document.querySelector("img[src='r/std/icons/combi64.png']").Click
工作！！！仅使用 IE.Document.getElementsByClassName("tbi")(1).Click 谢谢谢谢谢谢:)