VBA 单击 HTML 输入单选按钮答案

【问题标题】：VBA to click HTML Input Radio buttonVBA 单击 HTML 输入单选按钮
【发布时间】：2018-02-21 18:17:01
【问题描述】：

我想要一个 vba 代码到这个 url“http://www.anbima.com.br/ima/ima.asp”，然后点击“IRF-M”按钮，然后点击“Consultar”按钮。

我试过了，但失败得很惨：

'inserir website com os valores a serem buscados
sitedv01 = "http://www.anbima.com.br/ima/ima.asp"

'busca no site
Set IE = CreateObject("InternetExplorer.Application")

IE.Visible = True

IE.navigate sitedv01

'espera o carregamento
Do While IE.Busy
    Application.Wait DateAdd("s", 1, Now)
Loop

Set tags = IE.document.getElementsByValue("irf-m")
For Each tagx In tags
    If tagx.src = "http://www.bmf.com.br/bmfbovespa/images/comum/mais.gif" Then
        tagx.Click
    End If
Next

【问题讨论】：

标签： vba internet-explorer

【解决方案1】：

试试下面的方法。该脚本将首先单击IRF-M，然后单击Consultar。但是，当两次单击都成功启动后，您将看到一个包含所需数据的新窗口。

Sub Get_Data()

    With CreateObject("InternetExplorer.Application")
        .Visible = True
        .navigate "http://www.anbima.com.br/ima/ima.asp"
        While .Busy = True Or .readyState < 4: DoEvents: Wend

        .document.querySelector("input[value='irf-m']").Click
        .document.querySelector("img[name='Consultar']").Click
    End With

End Sub

【讨论】：

效果很好。现在，我想复制整个新页面，然后将所需的数据粘贴到我的工作表上并使用数字。你能帮我吗？我试过： IE.execWB 17, 0 IE.execWB 12, 0 但它复制了第 1 页，即原始页面，而不是带有数据的新页面。
先看看What should I do when someone answers my question?您可以随时打开一个新线程来提出新问题。