以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]EXCEL转换XML  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=103074)

--  作者:blsu33
--  发布时间:2017/6/30 9:10:00
--  [求助]EXCEL转换XML
老师,
    想要将EXCEL 通过FOXTABLE直接转换为XML文件,能直接转换吗?

--  作者:有点甜
--  发布时间:2017/6/30 9:29:00
--  

 方法一:用vba,用excel的另存为的功能,另存为xml格式

 

Dim App As New MSExcel.Application
app.DisplayAlerts = False
Dim Wb As MSExcel.Workbook = App.WorkBooks.Open("d:\\test.xls")
Wb.SaveAs(Filename:="d:\\test.htm", FileFormat:=MSExcel.XlFileFormat.xlHtml)
wb.close
app.quit
 

--  作者:有点甜
--  发布时间:2017/6/30 9:29:00
--  

 方法二:自己读取文件值,对应生成xml

 

http://www.foxtable.com/mobilehelp/scr/0172.htm

 


--  作者:blsu33
--  发布时间:2017/6/30 10:55:00
--  
甜版,
   是您吗。图片点击可在新窗口打开查看

--  作者:blsu33
--  发布时间:2017/6/30 11:31:00
--  
甜版 二楼的代码可以直接在EXCEL中调试吗?


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20170630113041.png
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2017/6/30 11:48:00
--  
2楼的代码,直接在foxtable里面调试即可。
--  作者:blsu33
--  发布时间:2017/6/30 13:06:00
--  
甜版,
   二楼转换完是HTML格式,不是XML格式。

--  作者:有点甜
--  发布时间:2017/6/30 14:44:00
--  

根据这里,改成你需要的格式。

 

https://msdn.microsoft.com/zh-cn/library/microsoft.office.interop.excel.xlfileformat.aspx

 


--  作者:blsu33
--  发布时间:2017/6/30 14:58:00
--  
哦 发帖前已经测试了很多次,不知道哪一个才是XML格式,生成TESt.xml文档不能使用。
劳烦您能告诉我哪一个才是XML的属性值
--  作者:有点甜
--  发布时间:2017/6/30 15:52:00
--  
xlXMLSpreadsheet 类型的。