如何在窗体中使用代码把excel的csv文件另存为excel的工作薄xls呢

fatmingli · 发表于 2015-1-10 10:34:22

本帖最后由 fatmingli 于 2015-1-10 10:39 编辑

如何在窗体中使用代码把excel的csv文件另存为excel的工作薄xls呢

原文件 .csv 用代码自动另存为新文件 .xls

不好意思，好像把贴子发错地方了。

tmtony · 发表于 2015-1-10 10:38:52

Set objWb = objExl.Workbooks.Open(CurrentProject.Path & "\你的excel文件.xls") '打开文件

另存为
objWb.SaveAs CurrentProject.Path & "\Output\FileAll.xls", -4143  'xlExcel8 56

xlExcel8 56
你可查一下csv等各种格式

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[模块/函数] 如何在窗体中使用代码把excel的csv文件另存为excel的工作薄xls呢

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)