为什么保存为Excel文件总要出错？ ( 积分: 100 )

L

laiyongjun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-09

• #1

try
ExcelApp.ActiveWorkBook.SaveAs(SaveDialog1.FileName,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,DocuType);
except
showmessage('保存工作簿失败！');
end;
==================================
为什么保存为Excel文件总要出错？
源码在：http://www.pengye.com.cn/gd/temp/sourcecode.rar
工具：D7

 

L

laiyongjun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-09

• #2

try
ExcelApp.ActiveWorkBook.SaveAs(SaveDialog1.FileName,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,DocuType);
except
showmessage('保存工作簿失败！');
end;
==================================
为什么保存为Excel文件总要出错？
源码在：http://www.pengye.com.cn/gd/temp/sourcecode.rar
工具：D7

 

Q

qcchan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-09

• #3

这是我的程序的一段代码，运行没有问题，你可以参考一下
Report.WorkBooks.Add;
Report.WorkBooks.Open('./aaa.xls');
rpName :='bbb.xls'
Sheet := Report.WorkBooks(1).Sheets(1);
Sheet:=Report.WorkSheets[1];
sheet.Activate;
Report.WorkBooks(1).SaveAs(rpName);
Sheet.SaveAs(rpName);

 

Y

ymjy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-09

• #4

AccessMode 可选 Variant 类型。工作簿访问方式。可以是下列 XlSaveAsAccessMode 常量之一：xlShared（共享清单）、xlExclusive（独占方式）或 xlNoChange（不改变访问方式）。

ExcelApp.ActiveWorkBook.SaveAs(SaveDialog1.FileName,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,1,EmptyParam,EmptyParam,EmptyParam,EmptyParam,DocuType);

 

L

laiyongjun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-09

• #5

Report.WorkBooks(1).SaveAs(rpName);
Sheet.SaveAs(rpName);
=====================
为什么工作薄保存了，还要保存工作表？

 

Y

ymjy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-09

• #6

出错原因是SaveAs中的AccessMode参数不可以用EmptyParam，用个阿拉伯数字就可以了

 

Q

qcchan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-09

• #7

Report.WorkBooks(1).SaveAs(rpName);
Sheet.SaveAs(rpName);
我做的是打开一个模板，修改完了另村一个文件

 

L

laiyongjun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-09

• #8

多人接受答案了。