我想再請教一下 我要將一個excel檔資料匯入到資料庫中 用以下元件讀excel(Excelapplicaption Excelworkbook Excelworksheet ) 同時要把把匯入資料的狀況 及幾筆相關資訊 回寫到excel的儲存格中 不曉得該如何做 BCDEFHIJKLMNOPQRSTUVWXZ

------
BCDEFHIJKLMNOPQRSTUVWXZ

引言: 我想再請教一下 我要將一個excel檔資料匯入到資料庫中 用以下元件讀excel(Excelapplicaption Excelworkbook Excelworksheet ) 同時要把把匯入資料的狀況 及幾筆相關資訊 回寫到excel的儲存格中 不曉得該如何做 BCDEFHIJKLMNOPQRSTUVWXZ

為何不利用搜尋功能搜尋以前的文章 @@~~飛翔在天際的精靈~~@@

[/quote] 為何不利用搜尋功能搜尋以前的文章 @@~~飛翔在天際的精靈~~@@ [/quote] 看了 還研究好幾天 不過一些東西 試不來就是了 ^^~~ EX: 插入一列 ExcelApplication1.activeSheet.columns[1].insert; .^^^^^^^^^^^^^^^^^^ 並無後面這段的提示命令 可能文件說明是適用於d5 我是用d6 ^^|| 我現在已經可以將資料回存到儲存格裡 但是 我希望能將原本的excel workbook 再新增一列在第一列前面 ^^^^^^^^ 其餘資料往右移 因這一列我要計算員工編號資料放到此 這一段試不出來 這樣看起來比較整齊 因為我不想把員工編號 放到每筆資料的最後面 不曉得有人做過嗎 BCDEFHIJKLMNOPQRSTUVWXZ

------
BCDEFHIJKLMNOPQRSTUVWXZ

你何不用OLE Server來存取Excel比較容易    Variant a=CreateOleObject("Excel,Application"); Variant b=a.Exec(PropertyGet("Workbooks")<<1); Variant c=b.Exec(PropertyGet("Worksheets")<<1); 這些物件設定好再參考VBA現上說明就可以ㄌ

http://delphi.ktop.com.tw/topic.php?TOPIC_ID=19473 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=25603 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=22849 TRY TRY SEE