關於DELPHI和EXCEL的文件

2021-04-13 07:26:46 字數 3907 閱讀 2265

類 別

:com   &   activex   (一

)  

使用動態建立的方法

首先建立

excel   物件,

使用顯示當前視窗

更改excel  

標題欄應用程式呼叫

microsoft   excel';  

3)  

新增新工作簿

開啟已存在的工作簿

設定第2

個工作表為活動工作表

或給單元格賦值

第一行第四列

';  

7)  

設定指定列的寬度(單位

:字元個數

),以第一列為例

設定指定行的高度(單位

:磅)(1磅=0.035厘公尺),

以第二行為例在第8

行之前插入分頁符在第8

列之前刪除分頁符

指定邊框線寬度左2-

右3-頂4-

底5-斜(   /   )   6-

斜(   /   )  

12)  

清除第一行第四列單元格公式

設定第一行字型屬性

隸書進行頁面設定

:  

a.頁首

報表演示

';  

b.頁尾第&p

頁';  

c.頁首到頂端邊距

2cm頁尾到底端邊距

3cm頂邊距

2cm底邊距

2cm左邊距

2cm右邊距

2cm頁面水平居中

頁面垂直居中

列印單元格網線

拷貝操作

:  

a.拷貝整個工作表

拷貝指定區域從a1

位置開始貼上

從檔案尾部開始貼上

插入一行或一列

刪除一行或一列

列印預覽工作表

列印輸出工作表

工作表儲存

工作表另存為

放棄存檔

關閉工作簿

24)   退出

(二)  

使用delphi  

控制項方法

在form

中分別放入

和excelworksheet

。1)  

開啟顯示當前視窗

更改excel  

標題欄應用程式呼叫

microsoft   excel';  

4)  

新增新工作簿

新增新工作表

:  

var   temp_worksheet:   _worksheet;  

begin  

temp_worksheet:=excelworkbook1.  

worksheets.add(emptyparam,emptyparam,emptyparam,emptyparam,0)   as   _worksheet;  

excelworksheet1.connectto(temp_worksheet);  

end;  

6)  

開啟已存在的工作簿

設定第2

個工作表為活動工作表

或給單元格賦值

第一行第四列

';  

9)  

設定指定列的寬度(單位

:字元個數

),以第一列為例

設定指定行的高度(單位

:磅)(1磅=0.035

厘公尺),

以第二行為例

厘公尺11)   在第8

行之前插入分頁符在第8

列之前刪除分頁符

指定邊框線寬度左2-

右3-頂4-

底5-斜(   /   )   6-

斜(   /   )  

14)  

清除第一行第四列單元格公式

設定第一行字型屬性

隸書進行頁面設定

:  

a.頁首

報表演示

';  

b.頁尾第&p

頁';  

c.頁首到頂端邊距

2cm頁尾到底端邊距

3cm頂邊距

2cm底邊距

2cm左邊距

2cm右邊距

2cm頁面水平居中

頁面垂直居中

列印單元格網線

拷貝操作

:  

a.拷貝整個工作表

拷貝指定區域從a1

位置開始貼上

從檔案尾部開始貼上

插入一行或一列

刪除一行或一列

列印預覽工作表

列印輸出工作表

工作表儲存

工作表另存為

放棄存檔

關閉工作簿退出三

)  

使用delphi  

控制excle

二維圖在

form

中分別放入

和excelworksheet  

var   asheet1,achart,   range:variant;  

1)選擇當第乙個工作薄第乙個工作表

增加乙個二維圖

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語法

一 使用動態建立的方法 sheet3.columns 1 columnwidth 20 設定單元格居中 設定單元格居右 14 進行頁面設定 15 拷貝操作 5 新增新工作表 var temp worksheet worksheet begin temp worksheet excelworkbook...

delphi 讀取Excel資料

一 使用動態建立的方法 首先建立 excel 物件,使用comobj var1 顯示當前視窗 2 更改 excel 標題欄 3 新增新工作簿 4 開啟已存在的工作簿 5 設定第2個工作表為活動工作表 或6 給單元格賦值 7 設定指定列的寬度 單位 字元個數 以第一列為例 8 設定指定行的高度 單位 ...

delphi操作excel語法

一 使用動態建立的方法 sheet3.columns 1 columnwidth 20 設定單元格居中 設定單元格居右 14 進行頁面設定 15 拷貝操作 5 新增新工作表 var temp worksheet worksheet begin temp worksheet excelworkbook...