用Delphi匯出了一張Excel作業表,最后保存的時候想保存為保護作業表,可是運行程式系統報錯,error 800A03EC,代碼如下,大家幫我看看,謝謝了。
MsExcel.DisplayAlerts:=false;
MsExcel.Range['A1','I200'].Locked:=True;
MsExcel.Range['A1','I200'].FormulaHidden:=True;
MsExcel.ActiveSheet.Protect(Password:='yjs',DrawingObjects:=True,Contents:=True,Scenarious:=True);
MsExcel.ActiveWorkbook.Save;
MsExcel.workbooks[1].Close(True,mypath+'\預算執行表\調整表.xls',false);
MsExcel.Quit;
MsExcel:=Unassigned;
olecontainer1.CreateLinkToFile(str1,false);
注釋掉第2,3,4行就正常 ,執行第四行就報錯。
uj5u.com熱心網友回復:
MsExcel:=Unassigned; 這個要去掉轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/104523.html
標籤:語言基礎/算法/系統設計
上一篇:"cannot allocate socket"什么原因
下一篇:啟動到某個app最后打開的界面
