Question

我遇到循环遍历div元素的问题，我不知道该怎么做。代码非常有效。

基本上我可以访问某个网站，并希望通过链接从中下载内容。我的代码查找并找到元素X并继续单击该元素。

问题是，元素X重复多次，例如.getElementByClassName（“AssetLinkText”）在HTML代码中重复几次，导致获取下载第一个“AssetLinkText”。

我在想，搜索将是搜索HTML，即每个循环，并查找内部文本“下载完整证券列表”的标记。但是，我不确定如何做到这一点。

Sub anotherAttempt()

'DECLARE VARIABLES
Dim browser As InternetExplorer
Dim document As HTMLDocument
Set browser = New InternetExplorer
Dim div

'MAKE VIS AND NAV
browser.Visible = True
browser.Navigate "https://etf.deutscheam.com/GBR/ENG/ETF/LU1221100792/-/DAX-UCITS-ETF-(DR)-Income"

'MULTITHREAD
Do While browser.Busy And Not browser.readyState = READYSTATE_COMPLETE
      DoEvents
Loop

'PERFORM ACTIONS
Set document = browser.document
Dim anchorElement As HTMLAnchorElement
Set anchorElement = document.getElementsByClassName("AssetLinkText")
'CHECK FOR HOLDINGS LINK
anchorElement.Click

End Sub

Answer 1

这项工作与我合作。

Dim divs As Object
Dim div As Object

// get all div element in DOM
Set divs = IE.document.getElementsByTagName("div")

// loop through all div elements
For Each div In divs
    // do things here
    // e.g. div.innerHTML = "hello"
Next div

使用VBA循环遍历DIV元素

1 个答案: