我想从包含此HTML的网页中获取一些文字。
<span id="result_box" class="short_text" lang="en">
<span class="hps">mothers</span>
<span class="hps">love</span>
</span>
我正在尝试使用:
Set html = CreateObject("htmlfile")
html.body.innerHTML = xmlHttp.ResponseText
Set objResult = html.getelementbyid("result_box")
For Each span In objResult
Set objspan = objResult.getelementsbytagname("span")(0).innerText
Range(1, 2) = objspan
Next
我正试图在Cell(1,2)中获得母亲喜欢的文字。
答案 0 :(得分:0)
我不是excel vba master,但逻辑上你的代码应该是这样的
For Each span In objResult
Set objspan = objspan + objResult.getelementsbytagname("span")(0).innerText
Next
Range(1, 2) = objspan
首先需要构建字符串然后分配给单元格外部循环。希望你理解逻辑。