大家好 小弟有個難題：我再BCB用OLE呼叫某一個含有巨集的EXCEL並讀取資料，讀完資料後用Wb.PR("Close");Ex.FN("Quit");關閉EXCEL，但是總是會出現［是否存檔］的對話框，請問有沒有辦法不讓它出現呢？ 如果直接EXCEL上用VBA CODING的話似乎只要加上 ActiveWorkbook.Close SaveChanges:=True 就可以了，但是怎麼在BCB上面也達到相同的效果呢？ HELLO

------
HELLO

Hi vinceliao,    加上以下程式碼試試：

  ExcelApp.DisplayAlerts := False;

---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

謝謝大大的建議，不過我是用 C Builder 並不是 DELPHI，所以需要用OLE來存取EXCEL。 不過剛剛我已經破解了，提出來供大家參考： 開啟內含巨集的EXCEL，方式跟一般並無不同，但關閉時要加上false/true參數，才不會出現［是否存檔］的對話框，也就是： Wb.PR("Close"); Ex.FN("Quit"); 改成 Wb.PR("Close",false); Ex.FN("Quit"); 後面這加上去的參數其實是VBA的 SaveChanges參數，TRUE代表［存檔］，FALSE代表［不存檔］，若省略此參數，就會跳出對話框來問你要不要存檔。 謝謝大家 HELLO

------
HELLO

Please use it.

[code cpp]
AnsiString szXlsFile=ExtractFilePath(Application->ExeName) "test.xls";
if(FileExists(szXlsFile)) DeleteFile(szXlsFile);
ExcelBook.OleFunction("SaveAs", StringToOleStr(szXlsFile));
[/code]

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.