2014-01-08 32 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將返回一個字符串。