vba GetElementByClassName()

vba GetElementByClassName(),vba,web-scraping,web-crawler,getelementsbyclassname,getelementsbytagname,Vba,Web Scraping,Web Crawler,Getelementsbyclassname,Getelementsbytagname,我是初学者 我正在学习网页抓取,但我有一些问题我自己解决不了。 我需要你的灵魂 我发现如何使用for函数在getelementbyclassname()中输入getelementbytagname(a) 像这样: 问题是什么? 帮助我。 非常感谢 我正在等待您的答案有什么错误?getElementsByTagName返回一个节点列表,因此您必须将此循环嵌套在另一个循环中,该循环遍历class=“name”元素。将此doc.getElementsByTagName(“a”)设置为HTMLElem

我是初学者

我正在学习网页抓取,但我有一些问题我自己解决不了。 我需要你的灵魂

我发现如何使用for函数在getelementbyclassname()中输入getelementbytagname(a)

像这样:

问题是什么? 帮助我。 非常感谢


我正在等待您的答案

有什么错误?
getElementsByTagName
返回一个节点列表,因此您必须将此循环嵌套在另一个循环中,该循环遍历
class=“name”
元素。将此
doc.getElementsByTagName(“a”)
设置为
HTMLElementCollection
,然后循环遍历此循环,尽管您可以使用
queryselector
来执行这两项操作,例如
doc.queryselectoral(“a.classname”)
类似于以下内容的
Dim c作为MSHTML.HTMLElementCollection Set c=d.queryselectoral(“a.class”)
For i = 0 To 23

Cells(3 + i, 5) = doc.getElementsByClassName("name").getElementsByTagName("a")(i).innerText
Cells(3 + i, 5).WrapText = False

Next i

'=========================================================
'above code
'this was error