我已经参考了Internet中的一些代码,将Excel文件转换为.xml文件。据我所知,代码首先从Excel文件中提取信息并将其转换为字符串,然后将该字符串写入.xml文件。
用于将字符串写入xml文件的代码如下:
Sub sWriteFile(strXML As String, strFullFileName As String)
Dim intFileNum As String
intFileNum = FreeFile
Open strFullFileName For Output As #intFileNum
Print #intFileNum, strXML
Close #intFileNum
End Sub
运行代码后,我有一个像这样的xml文件:
<?xml version="1.0"?>
<FATCA_OECD>
<MessageSpec>
<Tag2a>XXX</Tag2a>
<Tag2b>XXX</Tag2b>
</MessageSpec>
</FATCA_OECD>
我希望FATCA_OECD
标记成为:
<ftc:FATCA_OECD xsi:schemaLocation="urn:oecd:ties:fatca:v1 FatcaXML_v1.1.xsd" version="1.1" xmlns="urn:oecd:ties:stffatcatypes:v1" xmlns:ftc="urn:oecd:ties:fatca:v1" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
我还希望MessageSpec
标记成为:
<ftc:MessageSpec>
我尝试在代码的适当位置键入所有命名空间信息作为字符串。但是,每当我添加像冒号这样的特殊字符时,从代码生成的.xml文件看起来都是空白的。
如何解决这个问题?