用vba改变亚马逊的数量

Question

我尝试打开亚马逊网站，选择产品，转到购物车，按购物车并更改数量（例如450）。我有一个问题需要解决改变数量的最后一步。

This is the quantity button.

我试过了：

Set objIE = CreateObject("InternetExplorer.Application")
With objIE`

Set Element = .document.getElementsById("dropdown1_9")
Element.Click

和此：

Set Element = .document.getElementsByName("quantatiy").value = 10 
End with

两者都不起作用。我想我不知道按钮的类型，我试图操纵它。

有人可以帮我解决这个问题吗？我该怎么做才能改变数量？

Answer 1

我使用了这个，我没有把代码放到导航栏中，但是它会按照您的要求进行操作，不确定其未来的证据。

Public Sub test()


Dim objIE As SHDocVw.InternetExplorer
Dim objDoc As MSHTML.HTMLDocument
Dim ele As MSHTML.IHTMLElementCollection
Dim e As MSHTML.IHTMLElement

Set objIE = New SHDocVw.InternetExplorer

objIE.Visible = True

objIE.navigate "www.amazon.co.uk"

While objIE.Busy Or objIE.readyState <> READYSTATE_COMPLETE
    DoEvents
Wend

Set objDoc = objIE.document

Set ele = objDoc.getElementsByClassName("a-button-text a-declarative")

Set e = ele(0)

e.innerText = 2

End Sub