以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- excel请教 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74691) |
||||
-- 作者:hbhb -- 发布时间:2015/9/16 20:24:00 -- excel请教 大师:例子中的文件,如何通过代码自动导入,就是另存为excel97-2000文件,替换原路径的文件后自动导入?
|
||||
-- 作者:大红袍 -- 发布时间:2015/9/16 20:31:00 -- 参考 http://www.foxtable.com/help/topics/2492.htm
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=74682
|
||||
-- 作者:hbhb -- 发布时间:2015/9/16 20:43:00 -- 我要另存为自动覆盖原路径及文件的代码?怎么写? |
||||
-- 作者:大红袍 -- 发布时间:2015/9/16 20:47:00 -- 存为什么格式都可以
Dim App As New MSExcel.Application
app.DisplayAlerts = False
Dim Wb As MSExcel.Workbook = App.WorkBooks.Open("d:\\test.xls")
Wb.SaveAs(Filename:=ProjectPath & "Reports\\基层法律服务所名册.htm", FileFormat:=MSExcel.XlFileFormat.xlHtml)
wb.close
app.quit
|
||||
-- 作者:hbhb -- 发布时间:2015/9/16 20:55:00 -- 上面例子是什么鸟格式,有的软件导出后就是这样的! |
||||
-- 作者:大红袍 -- 发布时间:2015/9/16 21:20:00 -- 不知道你想做什么啊,转格参考4楼 |
||||
-- 作者:hbhb -- 发布时间:2015/9/16 21:49:00 -- 谢谢!不知您酒水平如何? |