如何用vb打开一个报错的excel文件？
现在有个excel文件由access生成的
目前直接打开他是有错的
错误信息如下图所示
其实错误的原因是因为access默认生成的sheet名字不符合规范
我的思路是用程序再次打开这个文件
修改sheet的名字
但打开这个程序的时候就会报错
请问在开打之前能否设置忽略报错之类的可以直接打开程序呢？
Dim appExcel As Excel.Application
Dim strPath As String
Dim strNewSheetName As String
Set appExcel = Excel.Application
strPath = file + ".xls"
'strPath = "c:\New Microsoft Excel Worksheet.xls"
strSheetName = newSheetName
appExcel.Visible = False
appExcel.DisplayAlerts = False
appExcel.Workbooks.Open strPath
appExcel.ActiveWorkbook.ActiveSheet.Name = strSheetName
appExcel.ActiveWorkbook.Save
appExcel.Quit
执行到open的时候就报错
Application-defined or object-defined error.
请问如何解决呢？
[解决办法]
access是怎么生成这个Excel的？
根本原因还是在生成的时候去个合法的名字。
[解决办法]
能否把那个excel文件发给我 dsd999@sohu.com
[解决办法]
邮件收到。
打开后，收工改名字，保存，再打开还是会报错，修改名字没成功。
所以你想通过代码改名字不是根本的解决办法，还是从access生成文件入手吧。
on error 语句在某些情况下也是不起作用的。
[解决办法]
exce是不允许sheet表有''字符。从表上看，你打开的数据是对的，屏蔽掉那个对话框就可以了，加上这句：
xlExcel.DisplayAlerts = False'关闭对话框提示
