以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 我想Excel另存为 带制表符的 txt (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91999) |
-- 作者:blackzhu -- 发布时间:2016/10/24 10:42:00 -- 我想Excel另存为 带制表符的 txt
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("E:\\xxxxx\\222.xlsx") Wb.SaveAs("E:\\xxx\\555.txt") App.Quit 我要转成带制表符的 txt fileformat 选哪个? Wb.SaveAs("E:\\美奥口腔办公系统1\\555.txt") 这边怎么改? |
-- 作者:有点蓝 -- 发布时间:2016/10/24 10:52:00 -- http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=20182 |
-- 作者:有点蓝 -- 发布时间:2016/10/24 10:52:00 -- http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=90857 |
-- 作者:blackzhu -- 发布时间:2016/10/24 11:00:00 -- XlFileFormat.xlCSV 如果是制表符 这边是改成什么? 不是空格! |
-- 作者:有点蓝 -- 发布时间:2016/10/24 11:37:00 -- vba只能保存为逗号分割的,比较麻烦 看3楼,这里 dim columnDelimeter as string = "$" range.Replace(",", columnDelimeter, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing) 先把源数据中的逗号更换成其它符号,然后保存为csv,再读取csv文件,把逗号替换为制表符,把其它符号再更换回逗号 还不如把Excel作为数据源,然后分页读取
|
-- 作者:blackzhu -- 发布时间:2016/10/24 11:47:00 -- 问题是 星期五就发现一个问题,如果是逗号,因为数据内有逗号,出现了导入的错误.做数据源的话数据量太大也不可取,你的大数据导入我已经搞定了. [此贴子已经被作者于2016/10/24 11:48:03编辑过]
|
-- 作者:有点蓝 -- 发布时间:2016/10/24 11:52:00 -- 没有办法,xlsx可以考虑用openxml读取。自己研究一下:http://blog.csdn.net/dapengbusi/article/details/38118679 |