excel - 尝试使用 Selenium + Excel VBA 从 Chrome 浏览器中的网站抓取代码

Question

我需要一些有关在 Excel (2013) VBE 中使用 Selenium Basic ChromeDriver (v 75.0.3770.140) 从 Chrome (v 75.0.3770.142) 网站抓取文本的指导。

这是 HTML:

<div ng-if="!ShippingDetails.isShippingCreatedOutsideSH" ng-bind="ShippingDetails.code" class="">3333333</div>

我需要提取的部分是“3333333”

我对 Selenium 类型库还是全新的，到目前为止，我还是笨拙地尝试了这个新手尝试:

Dim SHN As String
SHN = obj.FindElementByXPath("//div[@ng-if='!ShippingDetails.isShippingCreatedOutsideSH']/ng-bind[@'ShippingDetails.code']").Text
MsgBox SHN

Answer 1

要打印文本3333333，您可以使用以下任一 Locator Strategies :

• 使用CSS_SELECTOR:

  • 使用.Text:

    Debug.Print .FindElementByCss("div[ng-if$='isShippingCreatedOutsideSH'][ng-bind^='ShippingDetails']").Text
    

  • 使用.Attribute("innerHTML"):

    Debug.Print .FindElementByCss("div[ng-if$='isShippingCreatedOutsideSH'][ng-bind^='ShippingDetails']").Attribute("innerHTML") 
    

• 使用XPATH:

  • 使用.Text:

    Debug.Print .FindElementByXPath("//div[contains(@ng-if, 'isShippingCreatedOutsideSH') and starts-with(@ng-bind, 'ShippingDetails')]").Text
    

  • 使用.Attribute("innerHTML"):

    Debug.Print .FindElementByXPath("//div[contains(@ng-if, 'isShippingCreatedOutsideSH') and starts-with(@ng-bind, 'ShippingDetails')]").Attribute("innerHTML") 
    

You can find a relevant discussion in Vba selenium code to get data from Li class