請問我如何在Excel 複製一列資料及貼上資料? |
|
尚未結案
|
|
corey
一般會員   發表：34 回覆：44 積分：14 註冊：2003-04-19 發送簡訊給我 |
|
|
qoo1234
版主  發表：256 回覆：1167 積分：659 註冊：2003-02-24 發送簡訊給我 |
|
|
corey
一般會員 發表：34 回覆：44 積分：14 註冊：2003-04-19 發送簡訊給我 |
不好意思,問題內容詳述不夠清楚...^^
說明一下個人目前碰到之問題.
現有一excel報表,但報表內容我做了一些修改,我將表頭及表尾保留,中間資料將會從資料庫讀出轉入,但於中間資料有部份公式個人想保留,所以想用複製一整列的方式,插入(貼)於下一列資料,在從資料庫讀出資料轉入剛剛複製的那一列資料中,所以問題來了?
1.我要如何選取一整列(類似點選excel左邊row上的數字即可選擇一列)?
2.要如何複製,插入及貼上一整列?
3.在請問TExcelApplication,TExcelWorkbook,TExcelWorksheet這3個元件個別意思及關聯性?
本人對delphi轉入excel比較不熟悉,煩請大大們指教.
|
|
qoo1234
版主 發表：256 回覆：1167 積分：659 註冊：2003-02-24 發送簡訊給我 |
引言: 不好意思,問題內容詳述不夠清楚...^^ 說明一下個人目前碰到之問題. 現有一excel報表,但報表內容我做了一些修改,我將表頭及表尾保留,中間資料將會從資料庫讀出轉入,但於中間資料有部份公式個人想保留,所以想用複製一整列的方式,插入(貼)於下一列資料,在從資料庫讀出資料轉入剛剛複製的那一列資料中,所以問題來了? 1.我要如何選取一整列(類似點選excel左邊row上的數字即可選擇一列)? 2.要如何複製,插入及貼上一整列? 3.在請問TExcelApplication,TExcelWorkbook,TExcelWorksheet這3個元件個別意思及關聯性? 本人對delphi轉入excel比較不熟悉,煩請大大們指教. //複製第一行，到第二行 uses ComObj; ... var ExcelApp: Variant; ... procedure TForm1.Button1Click(Sender: TObject); begin ExcelApp := CreateOleObject( 'Excel.Application' ); ExcelApp.WorkBooks.Add; ExcelApp.Visible := True; ExcelApp.Cells[1,4].Value := '第1行第4列'; ExcelApp.Cells[2,4].Value := '第2行第4列'; end; procedure TForm1.Button2Click(Sender: TObject); begin ExcelApp.ActiveSheet.Rows[2].Insert; //插入行 ExcelApp.ActiveSheet.Rows[1].Copy; //複製第1行 ExcelApp.ActiveSheet.Rows[2].Select; //選擇第2行 ExcelApp.ActiveSheet.Paste; //在第2行貼上 end;  網海無涯，學無止境! 發表人 - qoo1234 於 2004/01/03 02:13:01
|
發表時間：2004-01-02 18:14:15
IP:211.78.xxx.xxx 未訂閱
系統時間：2024-06-30 22:21:19
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |