( 一 ) 使用動態建立的方法
首先建立 excel 物件,使用comobj :
var1 ) 顯示當前視窗:
2 ) 更改 excel 標題欄:
3 ) 新增新工作簿:
4 ) 開啟已存在的工作簿:
5 ) 設定第2個工作表為活動工作表:
或6 ) 給單元格賦值:
7 ) 設定指定列的寬度(單位:字元個數),以第一列為例:
8 ) 設定指定行的高度(單位:磅)(1磅=0.035 厘公尺),以第二行為例:
9 ) 在第8行之前插入分頁符:
10 ) 在第8列之前刪除分頁符:
11 ) 指定邊框線寬度:
1 - 左 2 - 右 3 - 頂 4 - 底 5 - 斜 ( \ ) 6 - 斜 ( / )
12 ) 清除第一行第四列單元格公式:
13 ) 設定第一行字型屬性:
14 ) 進行頁面設定:
a.頁首:
b.頁尾:
c.頁首到頂端邊距2cm:
d.頁尾到底端邊距3cm:
e.頂邊距2cm:
f.底邊距2cm:
g.左邊距2cm:
h.右邊距2cm:
i.頁面水平居中:
j.頁面垂直居中:
k.列印單元格網線:
15 ) 拷貝操作:
a.拷貝整個工作表:
b.拷貝指定區域:
c.從a1位置開始貼上:
d.從檔案尾部開始貼上:
16 ) 插入一行或一列:
17 ) 刪除一行或一列:
18 ) 列印預覽工作表:
19 ) 列印輸出工作表:
20 ) 工作表儲存:
21 ) 工作表另存為:
22 ) 放棄存檔:
23 ) 關閉工作簿:
24 ) 退出 excel:
( 二 ) 使用delphi 控制項方法
1 ) 開啟excel
2 ) 顯示當前視窗:
3 ) 更改 excel 標題欄:
4 ) 新增新工作簿:
5 ) 新增新工作表:
vartemp_worksheet : _worksheet ;
begin
temp_worksheet := excelworkbook1.
worksheets.add ( emptyparam , emptyparam , emptyparam , emptyparam , 0 ) as _worksheet ;
excelworksheet1.connectto ( temp_worksheet ) ;
end ;
6 ) 開啟已存在的工作簿:
emptyparam , emptyparam , emptyparam , emptyparam ,
emptyparam , emptyparam , emptyparam , emptyparam ,
emptyparam , emptyparam , emptyparam , emptyparam , 0 )
7 ) 設定第2個工作表為活動工作表:
或8 ) 給單元格賦值:
9 ) 設定指定列的寬度(單位:字元個數),以第一列為例:
10 ) 設定指定行的高度(單位:磅)(1磅=0.035 厘公尺),以第二行為例:
11 ) 在第8行之前插入分頁符:
12 ) 在第8列之前刪除分頁符:
13 ) 指定邊框線寬度:
1 - 左 2 - 右 3 - 頂 4 - 底 5 - 斜 ( \ ) 6 - 斜 ( / )
14 ) 清除第一行第四列單元格公式:
15 ) 設定第一行字型屬性:
16 ) 進行頁面設定:
a.頁首:
b.頁尾:
c.頁首到頂端邊距2cm:
d.頁尾到底端邊距3cm:
e.頂邊距2cm:
f.底邊距2cm:
g.左邊距2cm:
cation1.activesheet.pagesetup.leftmargin := 2 / 0.035 ;
h.右邊距2cm:
i.頁面水平居中:
j.頁面垂直居中:
k.列印單元格網線:
17 ) 拷貝操作:
a.拷貝整個工作表:
b.拷貝指定區域:
c.從a1位置開始貼上:
d.從檔案尾部開始貼上:
18 ) 插入一行或一列:
19 ) 刪除一行或一列:
20 ) 列印預覽工作表:
21 ) 列印輸出工作表:
22 ) 工作表儲存:
23 ) 工作表另存為:
24 ) 放棄存檔:
25 ) 關閉工作簿:
26 ) 退出 excel:
( 三 ) 使用delphi 控制excle二維圖
varasheet1 , achart , range : variant ;
1 )選擇當第乙個工作薄第乙個工作表
2 )增加乙個二維圖
achart := asheet1.chartobjects.add ( 100 , 100 , 200 , 200 ) ;
3 )選擇二維圖的形態
achart.chart.charttype := 4 ;
4 )給二維圖賦值
series := achart.chart.seriescollection ;
range := sheet1!r2c3 : r3c9 ;
series.add ( range , true ) ;
5 )加上二維圖的標題
achart.chart.hastitle := true ;
achart.chart.charttitle.characters.text := 』 excle二維圖』
6 )改變二維圖的標題字型大小
achart.chart.charttitle.font.size := 6 ;
7 )給二維圖加下標說明
achart.chart.axes ( xlcategory , xlprimary ) .hastitle := true ;
achart.chart.axes ( xlcategory , xlprimary ) .axistitle.characters.text := '' 下標說明 '' ;
8 )給二維圖加左標說明
achart.chart.axes ( xlvalue , xlprimary ) .hastitle := true ;
achart.chart.axes ( xlvalue , xlprimary ) .axistitle.characters.text := '' 左標說明 '' ;
9 )給二維圖加右標說明
achart.chart.axes ( xlvalue , xlsecondary ) .hastitle := true ;
achart.chart.axes ( xlvalue , xlsecondary ) .axistitle.characters.text := '' 右標說明 '' ;
10 )改變二維圖的顯示區大小
achart.chart.plotarea.left := 5 ;
achart.chart.plotarea.width := 223 ;
achart.chart.plotarea.height := 108 ;
11 )給二維圖座標軸加上說明
achart.chart.seriescollection [ 1 ] .name := '' 座標軸說明 '' ;
在delphi中讀取Excel資料
一 使用動態建立的方法 首先建立 excel 物件,使用comobj var 1 顯示當前視窗 2 更改 excel 標題欄 3 新增新工作簿 4 開啟已存在的工作簿 5 設定第2個工作表為活動工作表 或 取得excel中總行數和列數 tempermaxrows 6 給單元格賦值 7 設定指定列的寬...
讀取Excel資料
方法2 相當簡單,excel就像資料庫,每個sheet就是乙個table.microsoft.jet.oledb驅動.之後是datareader迴圈,或dataset處理都非常簡單.注意 資料型別的轉換 region set connection string strconn provider mi...
讀取Excel資料
excel2007的連線字串與excel2003的不同。datatable tbsheetname connection.getoledbschematable oledbschemaguid.tables,null 用來獲得sheet的名字 using system using system.io...