无法从隐藏的HTML标记中提取数据

时间:2013-01-19 12:04:22

标签: html5 excel-vba vba excel

HTML代码下方充当工具提示信息,鼠标悬停在链接上时显示。 使用.getelementbyclassname方法,我无法从页面获取值“Story& Experience”。 我想,在工具提示在加载时可见时,HTML代码无法提取。如何使其可见或提取数据?

我正在使用EXCEL VBA来执行此操作。

 <div id="ext-comp-1115" class="x-tip rich-tooltip" style="position: absolute; z-index: 25000; visibility: hidden; padding: 3px 0px 5px; width: 323px; left: 131px; top: 168px; display: none;">
<div class="ellipsis">Type: <span class="rich-tooltip-item">Story &amp; Experience</span></div></div></div>

VBA代码:

Dim IE As New InternetExplorer
IE.navigate "https://swym.3ds.com/#post:16884"
IE.Visible = True
Do
DoEvents
Loop Until IE.readyState = READYSTATE_COMPLETE
Application.Wait (Now() + TimeValue("00:00:016"))
Dim doc As HTMLDocument
Set doc = IE.document
Dim dd As Variant
dd = doc.getElementsByClassName("ellipsis").tags("span") 
MsgBox dd 

由于

1 个答案:

答案 0 :(得分:0)

doc.getElementsByClassName("ellipsis").tags("span") 返回一个对象而不是一个字符串值。我相信您正在寻找标签的 innerText 属性,所以要么...

'Set dd equal to the "span" tag object
Set dd = doc.getElementsByClassName("ellipsis").tags("span")
MsgBox dd.innerText

'Assign the "span" tag object's innerText string value to the dd variable
dd = doc.getElementsByClassName("ellipsis").tags("span").innerText
MsgBox dd
相关问题