請問如何將excel的值抓出 |
尚未結案
|
北方佬
一般會員 發表:15 回覆:35 積分:10 註冊:2005-07-27 發送簡訊給我 |
|
RedSnow
版主 發表:79 回覆:1322 積分:845 註冊:2003-12-15 發送簡訊給我 |
北方佬 您好: 請參考下列文章,看看是否能幫上忙?
C Builder 與 EXCEL 連結取值與存值
http://delphi.ktop.com.tw/topic.php?topic_id=29910 BCB 轉 EXCEL 大發現
http://delphi.ktop.com.tw/topic.php?topic_id=22668 怎樣用C Builder存取Excel
http://delphi.ktop.com.tw/topic.php?topic_id=20138
7 天天敲鍵盤 v 時時按滑鼠 8
|
北方佬
一般會員 發表:15 回覆:35 積分:10 註冊:2005-07-27 發送簡訊給我 |
我將這網址中的範例直接COPY過來http://delphi.ktop.com.tw/topic.php?topic_id=29910
可是有無定義的錯誤訊息
[C++ Error] Unit1.cpp(28): E2451 Undefined symbol 'OpenDialog1'
[C++ Error] Unit1.cpp(31): E2451 Undefined symbol 'ExcelApplication1'
[C++ Error] Unit1.cpp(33): E2451 Undefined symbol 'ExcelWorkbook1'
[C++ Error] Unit1.cpp(35): E2451 Undefined symbol 'ExcelWorksheet1'
[C++ Error] Unit1.cpp(41): E2316 '_fastcall TForm1::Button2Click(TObject *)' is not a member of 'TForm1'
請問這些訊息是不是還要定義些什麼呢?? 以下是我的完整的程式碼,請大大幫我指正錯誤的地方。感激不盡。
#include |
taishyang
站務副站長 發表:377 回覆:5490 積分:4563 註冊:2002-10-08 發送簡訊給我 |
|
北方佬
一般會員 發表:15 回覆:35 積分:10 註冊:2005-07-27 發送簡訊給我 |
|
北方佬
一般會員 發表:15 回覆:35 積分:10 註冊:2005-07-27 發送簡訊給我 |
|
jenwe
一般會員 發表:34 回覆:38 積分:24 註冊:2007-03-23 發送簡訊給我 |
|
boss.tw
高階會員 發表:15 回覆:109 積分:194 註冊:2005-05-17 發送簡訊給我 |
[code cpp] //--------------------------------------------------------------------------- // 寫入某值到 Excel 的某格中. void __fastcall TForm1::ButtonSetValueClick(TObject *Sender) { // 將該Excel 檔的 Worksheets 設給變數 Worksheets. Worksheets=Workbook.OlePropertyGet("Worksheets"); // 將 Worksheets 的第2 個 worksheet 設給變數 Worksheet. Worksheet=Worksheets.OlePropertyGet("Item", 2); // 取得第 (2,3) 個 cell. Cell=Worksheet.OlePropertyGet("Cells", 2, 3); Cell.OlePropertySet("Value", "CrazyStar"); // 設定它的文字內容為 "CrazyStar". } //--------------------------------------------------------------------------- // 讀取Excel 某格的值到程式中. void __fastcall TForm1::ButtonGetValueClick(TObject *Sender) { Variant Var; int A; float B; String C; // 將該Excel 檔的 Worksheets 設給變數 Worksheets. Worksheets=Workbook.OlePropertyGet("Worksheets"); // 將 Worksheets 的第2 個 worksheet 設給變數 Worksheet. Worksheet=Worksheets.OlePropertyGet("Item", 2); // 取得第 (2,3) 個 cell. Cell=Worksheet.OlePropertyGet("Cells", 2, 3); // 讀取該 cell 的值到變數 Var 中 Var=Cell.OlePropertyGet("Value"); // 轉換取得的資料. if (String(Var)!="") { A=StrToInt(Var); B=StrTofloat(Var); C=String(Var); } } [/code] 請參考 http://www.programmer-club.com/pc2020v5/forum/ShowSameTitleN.asp?URL=N&board_pc2020=cb&id=13074
編輯記錄
boss.tw 重新編輯於 2009-01-25 23:31:08, 註解 無‧
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |