卡饭网
手机版
论坛
首页 IT科技 安全资讯 卡饭教程 卡饭论坛
卡饭网 > excel > 正文

Excel Vba读取XML

来源：本站整理 作者：梦在深巷 时间：2013-03-18 23:59:23

如下代码示例的功能是，在Excel中，通过VBA代码，读取XML文件中的内容。

Dim rst As ADODB.Recordset

Dim stCon As String, stFile As String

Dim i As Long, j As Long

Set rst = New ADODB.Recordset

stFile = "C:dzwebs.xml"

stCon = "Provider=MSPersist;"

With rst

.CursorLocation = adUseClient

.Open stFile, stCon, adOpenStatic, adLockReadOnly, adCmdFile

Set .ActiveConnection = Nothing

End With

With ActiveSheet

For j = 0 To i - 1

.Cells(1, j + 1).Value = rst.Fields(j).Name

Next j

.Range("A2").CopyFromRecordset rst

End With

rst.Close

Set rst = Nothing

相关推荐

本周热门

本月热门

科技 安全 论坛 卡饭教程 手机版

Copyright2014-2020© 卡饭网  沪ICP备2020031077号-2

卡饭网提供的所有的资源均来自互联网，如有内容侵犯您的版权或其他利益，请及时向我们提出删除。联系邮箱：kf2020@kafan.cn