2014-01-08 35 views
0

我正尝试从网站的特定div's中将文本导入到Word文档中的书签,并且我坚持从网站读取HTML。我尝试了100个VBA Excel教程(也许这就是为什么),并始终是相同的结果。Visual Basic Word从网站获取元素

比方说,我有这样一个网站:

<html> 
<div id = "test"> 
    this is an example text 
</div> 
</html> 

,这里是我的VBA代码:

Sub read_html() 
Set objIE = CreateObject("InternetExplorer.Application") 

Dim htmlOut As String 
    With objIE 
     .Navigate "http://blabla.net/testy/test.html" 
     Do 
     Loop Until Not .Busy 
     htmlOut = .Document.getElementsByName("test") 
     .Quit 
    MsgBox "example:" & htmlOut 
    End With 
Set iexpl = Nothing 
End Sub 

的MSGBOX返回:例如[对象]

回答

0

getElementsByName将返回收集所有具有该名称的元素。即使只有一个,它仍然会返回一个集合。只是一个包含一个项目的集合。你可以得到的第一个元素集合中像

htmlOut = .Document.getElementsByName("test").Item(0).InnerText 

的.Item(0)将返回的第一个项目和.InnerText将返回一个字符串。