在Excel中使用DOM对象加载XML文档的方法

2019年8月14日02:38:13在Excel中使用DOM对象加载XML文档的方法已关闭评论 6 views

对于XML而言,DOM文档对象模型是一个对象化的数据接口,该对象模型包括多个对象集合,通过操作这些对象,可以轻松地操纵XML文档的数据。要使用DOM对象操作XML文档,首先需要建立Document对象。该对象在创建时,通常并不具备任何数据内容,用户在创建后,需要使用该对象的Load方法加载XML文档或者使用LoadXML方法加载XML字符串数据。本文介绍在Excel中使用DOM对象加载XML文档的方法。

1、启动Excel 2013并打开Visual Basic编辑器,选择“工具”|“引用”命令打开“引用”对话框,在“可使用的引用”列表中选择"Microsoft XML,v6.0"选项,如图1所示。单击“确定”按钮即可实现对XML库文件的引用。

在Excel中使用DOM对象加载XML文档的方法

图1 引用XML库文件

2、在工程资源管理器中添加一个模块,在模块的“代码”窗口中输入程序代码,如图2所示。具体的程序代码如下所示:

Sub CreatXMLDocument()

Dim xmlDoc1 As New DOMDocument '新建Document文档对象

Dim xmlDoc2 As New DOMDocument '新建Document文档对象

Dim strTemp As String

xmlDoc1.async=False

xmlDoc1.Load ThisWorkbook.Path&"\学生信息.xml" '直接加载XML文档

strTemp=xmlDoc1.XML '保存XML字符串

Debug.Print strTemp '输出XML字符串

xmlDoc2.LoadXML strTemp 'Document对象使用XML字符串加载数据

Debug.Print xmlDoc2.XML '输出XML字符串

Set xmlDoc1=Nothing

Set xmlDoc2=Nothing

End Sub

在Excel中使用DOM对象加载XML文档的方法

图2 插入模块并输入程序代码

提示

代码第5行使XML文件的下载不被同步处理。在XML中,async属性的取值为True时,表示load()方法可在下载完成之前,向调用程序返回控制权;取值为False时,则表示必须完成文件的下载,才能返回控制权。

3、按F5键运行以上过程,此时在“立即窗口”中将显示“学生信息.xml”文档数据,如图3所示。

在Excel中使用DOM对象加载XML文档的方法

图3 程序运行的结果