Excel对象中的WorkBook对象中的SaveAs方法该怎么用？

[几罗星人]

为什么我按下面的参数调用（下面的1,2都试过，不行），根本就没有保存。

O_XlsBook.SaveAs Text2.Text, xlExcel2 
'Text2.Text存放的是要保存到的文件完整路径（包括拓展名）
’O_XlsBook是WorkBook对象

O_XlsBook.SaveAs Text2.Text
'Text2.Text存放的是要保存到的文件完整路径（包括拓展名）
’O_XlsBook是WorkBook对象

我又试过调用WorkSheet对象的Save方法，调用APP的SaveWorkspace方法，均不行，为什么？希望能提供一个正确保存的语句以供参考

[贝隆]

http://download.csdn.net/detail/veron_04/1627060看看那这个资料，里面有：

[几罗星人]

但是上面没有说怎么用指定的格式保存啊~~~

[贝隆]

你要保存什么格式？

[几罗星人]

我用如下语句进行保存：
O_XlsBook.SaveAs "E:\个人成绩单.xls"
保存之后我找到这个文件，用Excel打开的时候，却说我这个文件的文件格式（内部文件结构）与拓展名不符。我用的Excel是2010版的，默认的文件格式是xlsx，那如果要保存成xls怎么办？

[几罗星人]

怎么样？难道没有人知道怎么用指定的格式保存吗？

[jhjinpei]

Dim TempExcel As Excel.Application
Dim Tempexcelfile As String '文件名
。。。。。
TempExcel.ActiveWorkbook.SaveAs Tempexcelfile

[几罗星人]

我知道了。看这个代码：

O_XlsBook.SaveAs Text2.Text, xlExcel7

O_XlsBook是工作簿对象，Text2.Text是保存的路径和文件名（包括拓展名），xlExcel7表示用Excel2003格式（*.xls）来储存，xlExcel14表示用Excel2007或2010的格式（*.xlsx）来储存

[seawaycao]

“xlExcel7表示用Excel2003格式（*.xls）来储存，xlExcel14表示用Excel2007或2010的格式（*.xlsx）来储存 ”

原来是这样啊，“文件格式（内部文件结构）与拓展名不符这个问题”困扰了我好久！
谢谢分享啊！~