Question

stackoverflow的新手，我在这个论坛和其他网站上进行了搜索，并在发布之前尝试了他们的建议，但没有成功。我是Excel VBA的新手，正在尝试使用VBA自动在bestbuy.com上进行搜索。搜索字段有效，但是我无法提交搜索，我检查了“按钮”，但没有ID。任何帮助表示赞赏。谢谢大家！

> Sub AAA() 
> Set objie = CreateObject("InternetExplorer.Application")
> objie.Top = 0 
> objie.Left = 0 
> objie.Width = 800 
> objie.Height = 600
> objie.AddressBar = 0 
> objie.StatusBar = 0
> objie.Toolbar = 0
> objie.Visible = True 
> 
> 
> objie.Navigate ("http://www.bestbuy.com") Do DoEvents Loop Until
> objie.ReadyState = 4
> 
>             objie.Document.getElementById("gh-search-input").Value = "bose radio"
>             objie.Document.getElementByClassName("header-search-button").Click
> Do
> Do events
> Loop Until objie.ReadyState = 4
> End Sub

Answer 1

尝试

objie.document.forms(0).submit

Excel VBA Internet Explorer单击没有ID的按钮

1 个答案: