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