主题：导出到excel2007后，文档无法打开

将系统统计的数据导出到excel2003版本后能够自动打开，文档正常，但是导出到2007版本，无法打开，手动打开excel文档提示如下：“Excel 无法打开文件，因为文件格式或文件扩展名无效。请确定文件未损坏，并且文件扩展名与文件格式匹配” 。

book原来是什么的，保存就只能保存成什么的。

 

Book.Save(ProjectPath & "文件名.xls" )

保存格式为excel2003时，定义  Dim Book As New XLS.Book，我想将最后保存格式变为excel2007，  book要这么定义吗？ ==>   Dim Book As New XLSx.Book

这样写

 

Dim App As New MSExcel.Application
try
    app.DisplayAlerts = False
    Dim Wb As MSExcel.WorkBook = App.WorkBooks.open("d:\test.xls")
    wb.SaveAs(Filename:="d:\test.xlsx", FileFormat:=MSExcel.XlFileFormat.xlOpenXMLWorkbook)
catch ex As exception
    msgbox(ex.message)
finally
    app.quit
End try

谢谢  大红袍老师，文档转换的问题已经解决。

参考

 

http://www.foxtable.com/help/topics/0338.htm

 

问题已解决，谢谢大红袍老师！