excel加載XML 在Excel中使用DOM對(duì)象加載XML文檔的方法,近日有關(guān)世界杯的新聞太多,大家是不是都目不暇接了?不要留戀,還是默默的學(xué)點(diǎn)技術(shù)吧,比如“excel加載XML”這一干貨技術(shù)是excel加載XML 在Excel中使用DOM對(duì)象加載XML文檔的方法來實(shí)現(xiàn)這一技術(shù),快跟小編來了解一下這個(gè)實(shí)用技能吧~
對(duì)于XML而言,DOM文檔對(duì)象模型是一個(gè)對(duì)象化的數(shù)據(jù)接口,該對(duì)象模型包括多個(gè)對(duì)象集合,通過操作這些對(duì)象,可以輕松地操縱XML文檔的數(shù)據(jù)。要使用DOM對(duì)象操作XML文檔,首先需要建立Document對(duì)象。該對(duì)象在創(chuàng)建時(shí),通常并不具備任何數(shù)據(jù)內(nèi)容,用戶在創(chuàng)建后,需要使用該對(duì)象的Load方法加載XML文檔或者使用LoadXML方法加載XML字符串?dāng)?shù)據(jù)。本文介紹在Excel中使用DOM對(duì)象加載XML文檔的方法。
1、啟動(dòng)Excel 2013并打開Visual Basic編輯器,選擇“工具”|“引用”命令打開“引用”對(duì)話框,在“可使用的引用”列表中選擇"Microsoft XML,v6.0"選項(xiàng),如圖1所示。單擊“確定”按鈕即可實(shí)現(xiàn)對(duì)XML庫文件的引用。
圖1 引用XML庫文件
2、在工程資源管理器中添加一個(gè)模塊,在模塊的“代碼”窗口中輸入程序代碼,如圖2所示。具體的程序代碼如下所示:
Sub CreatXMLDocument()
Dim xmlDoc1 As New DOMDocument '新建Document文檔對(duì)象
Dim xmlDoc2 As New DOMDocument '新建Document文檔對(duì)象
Dim strTemp As String
xmlDoc1.async=False
xmlDoc1.Load ThisWorkbook.Path&"學(xué)生信息.xml" '直接加載XML文檔
strTemp=xmlDoc1.XML '保存XML字符串
Debug.Print strTemp '輸出XML字符串
xmlDoc2.LoadXML strTemp 'Document對(duì)象使用XML字符串加載數(shù)據(jù)
Debug.Print xmlDoc2.XML '輸出XML字符串
Set xmlDoc1=Nothing
Set xmlDoc2=Nothing
End Sub
圖2 插入模塊并輸入程序代碼
提示
代碼第5行使XML文件的下載不被同步處理。在XML中,async屬性的取值為True時(shí),表示load()方法可在下載完成之前,向調(diào)用程序返回控制權(quán);取值為False時(shí),則表示必須完成文件的下載,才能返回控制權(quán)。
3、按F5鍵運(yùn)行以上過程,此時(shí)在“立即窗口”中將顯示“學(xué)生信息.xml”文檔數(shù)據(jù),如圖3所示。
圖3 程序運(yùn)行的結(jié)果