var tempex, tempwb: Variant; begin tempex:= CreateOleObject('Excel.Application'); tempex.Visible:= True; tempwb:= tempex.WorkBooks.Open(OrigName); tempwb.SaveAs(FileName:= tempName AOldName, FileFormat:= xlText) tempwb.Saved:= True; tempex.Quit; ... end; 以上的方式為將Excel檔另存為txt 但是因為如遇到相同檔名時Excel在關閉前就會先詢問是否覆蓋原檔案!!! 想請問... 有何方式可以完全背後執行 不開啟Excel就直接另存 且覆蓋原檔案???

提供較快速的解決方案：  

var
  tempex, tempwb: Variant;
begin
  tempex := CreateOleObject('Excel.Application');
  //tempex.Visible := True;這行不加就能在背景執行，或設為False
  tempwb := tempex.WorkBooks.Open(OrigName);
  if FileExists(tempName   AOldName) then //若檔案已存在
    DeleteFile(tempName   AOldName)//刪掉原來的檔案，
    //另存時就不會詢問是否覆蓋原檔案啦
  tempwb.SaveAs(FileName := tempName   AOldName, FileFormat := xlText)
    tempwb.Saved := True;
  tempex.Quit;
  ...
end;
 

忙盲茫