Question

我无法单击“获取详细信息按钮”。

下面将提到HTML标记

<button class="btn btn-success">Get Details</button>

代码：

Sub chromAuto()

    Dim obj As New WebDriver
    obj.Start "chrome"
    obj.Get "websitedetails"
    obj.FindElementById("asin").SendKeys (ThisWorkbook.Sheets("Sheet1").Range("A2").Value)

End Sub

Answer 1

这取决于该课程有多少个项目。一种更快的方法是使用css选择器，例如

含硒

obj.FindElementByCss(".btn-success").click

nodeList中有多个元素索引

obj.FindElementsByCss(".btn-success")(1).click '1 is an example index

使用ie和Microsoft Internet控件

ie.document.querySelector(".btn-success").click

Answer 2

不太了解HTML环境，但是您可以尝试以下操作：

Dim ie_obj As Object
Set ie_obj = CreateObject("InternetExplorer.Application")
ie_obj.Visible = True

ie_obj.Navigate "www.somesite.com"

Do While ie.READYSTATE = 4: DoEvents: Loop

ie.Document.getElementsByClassName("my_name")(0).getElementsByTagName("a")(0).click

如何使用VBA Excel单击按钮

2 个答案: