按鈕點擊使用vba拋出錯誤

Question

我需要點擊網頁中的按鈕，但網頁中有多個具有相同屬性的元素，我的代碼顯示錯誤消息。

在跟蹤和錯誤的基礎上，我試圖點擊每一個元素一個一個，即使我無法得到所需的東西。

請找我下面

Set objIE = CreateObject("InternetExplorer.Application") 

With objIE 
.Visible = True 
.navigate "http://www.cargurus.com/" 


Do While .busy Or _ 
.readyState <> 4 
DoEvents 
Loop 

Set what = .document.getElementsByName("zip") 
what.Item(0).Value = "606061" 

Set Search = .document.getElementByClass("btn btn-warning")'Here i need to find the button and click using. 
Search.Item(0).click ' I tried to iterate different values up to 4 


End With 

Answer 1

首先代碼：哪個城市應具備的郵政編碼606061？

第二：沒有方法document.getElementByClass，但是document.getElementsByClassName。

第三：如果你有一個INPUT元素，那麼你也有INPUTElement.form的FORM元素。所以你可以簡單地使用INPUTElement.form.submit（）提交表單。

... 
Set what = .document.getElementsByName("zip") 
what.Item(0).Value = "60601" 

what.Item(0).form.submit 

'Set Search = .document.getElementsByClassName("btn btn-warning") 
'Search.Item(1).Click 
... 

問候

阿克塞爾