Question

VBA csv文件保存成excel时候出错

office版本是2010 excel版本是14.0多

代码如下

1 MyFile = Replace(FileName, ".csv", ".xls")

2 ActiveWorkbook.SaveAs FileName:=MyFile, FileFormat:= _
xlNormal, CreateBackup:=False
3 Workbooks(MyFile).Close SaveChanges:=True

FileName是文件全路径

当我执行到第2句的事后 就会提示互换性检查 出一个提示的对话框
手动关闭对话框后 继续这行第三步

就会走到 Error_Handle:

到底哪块出了问题
有什么必须注意的我没注意到吗？

若以下回答无法解决问题，邀请你更新回答

Answer 1

我估计是Fileformat参数设置的问题。你先记录个宏看下代码，再查查看。我是猜的，不一定对。

Answer 2

文件发来 我帮你导