ExcelSaveAs2
简述
按照类型另存为，类型参照Excel的文档。注意，另存文件后需要将Excel进程退出，否则Excel处于加锁的状态，不能再进行修改等操作。
ExcelSaveAs2(FileName;NewName:String;FileFormat:Integer):Boolean;
| 名称 | 类型 | 说明 |
|---|
| FileName | String | 字符串类型。原Excel文件名称 |
| NewName | String | 字符串类型。另存后新的Excel文件名称 |
| FileFormat | Integer | 整数类型。文件类型所对应的编号，参考导入导出类型函数 |
| 返回 | Boolean | 如果成功则返回真，如果指定的原文件（FileName）不存在或者失败则返回假 |
//将本地文件C:\VBA.xls另存为：C:\VBA11.xls
ret:=rdo2 ExcelSaveAs2("C:\\VBA.xls","C:\\VBA11.xls",ftxls());
if ret then
begin
ret1:=rdo2 ExcelQuit();
if ret1 then return 'Excel另存成功';
else return 'Excel退出失败';
end;
return 'Excel 另存失败';