D
daocao2001
Unregistered / Unconfirmed
GUEST, unregistred user!
主要代码如下 已经包含了comobj单元
主要代码如下
MyExcel := CreateOleObject('Excel.Application');
MyExcel.Visible := true;
MyExcel.Workbooks.Open(savedialog1.FileName+'.xls'); //打开EXECL文件
MYexcel.WorkSheets[1].Activate;
myExcel.SaveAs(savedialog1.FileName+'.wk1', FileFormat:=xlWK1, CreateBackup:=False);
运行后,execl文件可以打开
随后报错,'Method 'SaveAs' not supported by automation object'
研究了很久还是没有办法解决,请大侠们帮帮小弟
主要代码如下
MyExcel := CreateOleObject('Excel.Application');
MyExcel.Visible := true;
MyExcel.Workbooks.Open(savedialog1.FileName+'.xls'); //打开EXECL文件
MYexcel.WorkSheets[1].Activate;
myExcel.SaveAs(savedialog1.FileName+'.wk1', FileFormat:=xlWK1, CreateBackup:=False);
运行后,execl文件可以打开
随后报错,'Method 'SaveAs' not supported by automation object'
研究了很久还是没有办法解决,请大侠们帮帮小弟