設定Excel文件Cell的Function

發文回覆瀏覽次數：1052

推到 Plurk!

推到 Facebook!

答題得分者是：RaynorPao

RemycinLu
一般會員

發表：34
回覆：20
積分：10
註冊：2003-10-02

發送簡訊給我

#1 引用回覆回覆

發表時間：2004-08-02 13:38:56

IP:66.144.xxx.xxx 未訂閱

要怎麼才能設定Excel文件某個Cell的Function?例如我想設定K1=SUM(A1:J1)

RaynorPao
版主

發表：139
回覆：3622
積分：7025
註冊：2002-08-12

發送簡訊給我

#2 引用回覆回覆

發表時間：2004-08-02 14:07:20

IP:203.73.xxx.xxx 未訂閱

引言: 要怎麼才能設定Excel文件某個Cell的Function?例如我想設定K1=SUM(A1:J1) < face="Verdana, Arial, Helvetica">

RemycinLu 你好:
(1)跟前幾篇問題中的做法差不多，用 OlePropertySet("Value", ...); 就可以
   達到目的
(2)請參考以下的範例程式碼
#
            szValue="=SUM("
            szValue="=SUM(">ProcessMessages();
      }
   }
   AnsiString szXlsFile=ExtractFilePath(Application->ExeName)+"test2.xls";
   if(FileExists(szXlsFile)) DeleteFile(szXlsFile);
   ExcelBook.OleFunction("SaveAs", StringToOleStr(szXlsFile));
   ExcelBook.OleFunction("Close");
   ExcelApp.OleFunction("Quit");
}
(3)請再依照自己的需求，自行修改
    < src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=10003806&CC=223734"> -- Enjoy Researching & Developing --

------
-- 若您已經得到滿意的答覆，請適時結案!! --
-- 欲知前世因，今生受者是；欲知來世果，今生做者是 --
-- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 --

系統時間：2024-11-25 15:57:58

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！