将 XML 表格 Excel 工作表导出到单元格中答案

【问题标题】：Export XML table excel sheet into cell将 XML 表格 Excel 工作表导出到单元格中
【发布时间】：2014-10-04 21:11:24
【问题描述】：

使用 excel Developer 我可以使用模板将数据表转换为XML 文件。

是否可以将此XML 文件内容作为String 加载到另一个工作表中的单元格？

例如，

表 1

       A       B     C     ...

 1    col1   col2   col3
 2    a      1      z
 3    b      2      x
 4    c      3      w

此表可以使用模板导出为

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<conf xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
    <data>
        <col1>a</col1>
        <col2>1</col2>
        <col3>z</col3>
    </data>
    <data>
        <col1>b</col1>
        <col2>2</col2>
        <col3>x</col3>
    </data>
    <data>
        <col1>c</col1>
        <col2>3</col2>
        <col3>w</col3>
    </data>
</conf>

如何将此 XML 作为 String 放入 A1 单元格中的 Sheet2 中？

可能最好的方法是创建一个可以导出为 XML 并将值发布到单元格中的宏按钮。如果是真的，我该怎么办？

【问题讨论】：

标签： xml excel export-to-excel

【解决方案1】：

找到了一种简单的方法。

使用宏：

Sub TestXML()
 Dim strContactData As String
 Dim myWb As Excel.Workbook
 Set myWb = ActiveWorkbook

 myWb.XmlMaps("configuration_Map").ExportXml Data:=strContactData

 Worksheets("SHEET_NAME").Cells(LINE_NUMBER, COL_NUMBER) = strContactData



End Sub

【讨论】：