Question

我正在编写一个脚本，我可以通过宏在网站上执行表单。我能够打开Internet Explorer并正确传递所有变量，但是当提交时，我有点迷失。

这是我要点击的网站上的元素 - 这是一个标题为“购买”的按钮

<input type="submit" name="submit" value="Buy">

我有两个问题：

1）我不知道如何在vba中正确引用它 2）它旁边有一个按钮，它将执行销售（与我想做的完全相反），其元素是：

<input type="submit" name="submit" value="Sell">

有没有人知道点击“购买”按钮的相应代码？

到目前为止，这是我的代码：

Dim IE As Object
Set IE = New InternetExplorer
IE.Visible = True
IE.Navigate "somewebsite.com"

Do While IE.Busy: DoEvents: Loop
Do While IE.ReadyState <> 4: DoEvents: Loop
IE.Document.All("resourceoption").Value = "item"
IE.Document.All("amount").Value = 1
IE.Document.All("priceper").Value = 99
Do While IE.Busy: DoEvents: Loop
Do While IE.ReadyState <> 4: DoEvents: Loop

Answer 1

With IE.document

    Set elems = .getElementsByTagName("input")
    For Each e In elems

        If (e.getAttribute("value") = "Buy") Then
            e.Click
            Exit For
        End If

    Next e

End With

以上代码段执行所需的任务

＆＃39;单击＆＃39;一个带有excel VBA的网站按钮

1 个答案: