我欲封天耳根小说,有声

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷解決方案

C#操作Excel之Delphi控件方法

C# 操作Excel之Delphi控件方法

創(chuàng)新互聯(lián)為企業(yè)級(jí)客戶提高一站式互聯(lián)網(wǎng)+設(shè)計(jì)服務(wù)，主要包括網(wǎng)站設(shè)計(jì)制作、做網(wǎng)站、APP應(yīng)用開發(fā)、微信平臺(tái)小程序開發(fā)、宣傳片制作、LOGO設(shè)計(jì)等，幫助客戶快速提升營(yíng)銷能力和企業(yè)形象，創(chuàng)新互聯(lián)各部門都有經(jīng)驗(yàn)豐富的經(jīng)驗(yàn)，可以確保每一個(gè)作品的質(zhì)量和創(chuàng)作周期，同時(shí)每年都有很多新員工加入，為我們帶來(lái)大量新的創(chuàng)意。

在Form中分別放入ExcelApplication,ExcelWorkbook和ExcelWorksheet。

C# 操作Excel之Delphi控件方法1）打開Excel

ExcelApplication1.Connect;

C# 操作Excel之Delphi控件方法2)顯示當(dāng)前窗口：

ExcelApplication1.Visible[0]:=True;

C# 操作Excel之Delphi控件方法3)更改Excel標(biāo)題欄：

ExcelApplication1.Caption:='應(yīng)用程序調(diào)用MicrosoftExcel';

C# 操作Excel之Delphi控件方法4)添加新工作簿：

ExcelWorkbook1.ConnectTo(ExcelApplication1.Workbooks.Add(EmptyParam,0));

C# 操作Excel之Delphi控件方法5)添加新工作表：

 
 
 
  
  
  varTemp_Worksheet:_WorkSheet; 
  
  
  
  
  
  begin 
  
  
  
  
  
  Temp_Worksheet:=ExcelWorkbook1. 
  
  
  
  
  
  WorkSheets.Add(EmptyParam,EmptyParam,EmptyParam,EmptyParam,0)as_WorkSheet; 
  
  
  
  
  
  ExcelWorkSheet1.ConnectTo(Temp_WorkSheet); 
  
  
  
  
  
  End;

C# 操作Excel之Delphi控件方法6)打開已存在的工作簿：

 
 
 
  
  
  ExcelApplication1.Workbooks.Open(c:\a.xls 
  
  
  
  
  
  EmptyParam,EmptyParam,EmptyParam,EmptyParam, 
  
  
  
  
  
  EmptyParam,EmptyParam,EmptyParam,EmptyParam, 
  
  
  
  
  
  EmptyParam,EmptyParam,EmptyParam,EmptyParam,0)

C# 操作Excel之Delphi控件方法7)設(shè)置第2個(gè)工作表為活動(dòng)工作表：

 
 
 
  
  
  ExcelApplication1.WorkSheets[2].Activate;或 
  
  
  
  
  
  ExcelApplication1.WorksSheets['Sheet2'].Activate;

C# 操作Excel之Delphi控件方法8)給單元格賦值：

ExcelApplication1.Cells[1,4].Value:='***行第四列';

C# 操作Excel之Delphi控件方法9)設(shè)置指定列的寬度（單位：字符個(gè)數(shù)），以***列為例：

ExcelApplication1.ActiveSheet.Columns[1].ColumnsWidth:=5;

C# 操作Excel之Delphi控件方法10)設(shè)置指定行的高度（單位：磅）（1磅＝0.035厘米），以第二行為例：

ExcelApplication1.ActiveSheet.Rows[2].RowHeight:=1/0.035;//1厘米

C# 操作Excel之Delphi控件方法11)在第8行之前插入分頁(yè)符：

ExcelApplication1.WorkSheets[1].Rows[8].PageBreak:=1;

C# 操作Excel之Delphi控件方法12)在第8列之前刪除分頁(yè)符：

ExcelApplication1.ActiveSheet.Columns[4].PageBreak:=0;

C# 操作Excel之Delphi控件方法13)指定邊框線寬度：

ExcelApplication1.ActiveSheet.Range['B3:D4'].Borders[2].Weight:=3;

1-左2-右3-頂4-底5-斜(\)6-斜(/)

C# 操作Excel之Delphi控件方法14)清除***行第四列單元格公式：

ExcelApplication1.ActiveSheet.Cells[1,4].ClearContents;

C# 操作Excel之Delphi控件方法15)設(shè)置***行字體屬性：

 
 
 
  
  
  ExcelApplication1.ActiveSheet.Rows[1].Font.Name:='隸書'; 
  
  
  
  
  
  ExcelApplication1.ActiveSheet.Rows[1].Font.Color:=clBlue; 
  
  
  
  
  
  ExcelApplication1.ActiveSheet.Rows[1].Font.Bold:=True; 
  
  
  
  
  
  ExcelApplication1.ActiveSheet.Rows[1].Font.UnderLine:=True;

C# 操作Excel之Delphi控件方法16)進(jìn)行頁(yè)面設(shè)置：

a.頁(yè)眉：

ExcelApplication1.ActiveSheet.PageSetup.CenterHeader:='報(bào)表演示';

b.頁(yè)腳：

ExcelApplication1.ActiveSheet.PageSetup.CenterFooter:='第&P頁(yè)';

c.頁(yè)眉到頂端邊距2cm：

ExcelApplication1.ActiveSheet.PageSetup.HeaderMargin:=2/0.035;

d.頁(yè)腳到底端邊距3cm：

ExcelApplication1.ActiveSheet.PageSetup.HeaderMargin:=3/0.035;

e.頂邊距2cm：

ExcelApplication1.ActiveSheet.PageSetup.TopMargin:=2/0.035;

f.底邊距2cm：

ExcelApplication1.ActiveSheet.PageSetup.BottomMargin:=2/0.035;

g.左邊距2cm：

ExcelApplication1.ActiveSheet.PageSetup.LeftMargin:=2/0.035;

h.右邊距2cm：

ExcelApplication1.ActiveSheet.PageSetup.RightMargin:=2/0.035;

i.頁(yè)面水平居中：

ExcelApplication1.ActiveSheet.PageSetup.CenterHorizontally:=2/0.035;

j.頁(yè)面垂直居中：

ExcelApplication1.ActiveSheet.PageSetup.CenterVertically:=2/0.035;

k.打印單元格網(wǎng)線：

ExcelApplication1.ActiveSheet.PageSetup.PrintGridLines:=True;

C# 操作Excel之Delphi控件方法17)拷貝操作：

a.拷貝整個(gè)工作表：

ExcelApplication1.ActiveSheet.Used.Range.Copy;

b.拷貝指定區(qū)域：

ExcelApplication1.ActiveSheet.Range['A1:E2'].Copy;

c.從A1位置開始粘貼：

ExcelApplication1.ActiveSheet.Range.['A1'].PasteSpecial;

d.從文件尾部開始粘貼：

ExcelApplication1.ActiveSheet.Range.PasteSpecial;

C# 操作Excel之Delphi控件方法18)插入一行或一列：

a.ExcelApplication1.ActiveSheet.Rows[2].Insert;

b.ExcelApplication1.ActiveSheet.Columns[1].Insert;

C# 操作Excel之Delphi控件方法19)刪除一行或一列：

a.ExcelApplication1.ActiveSheet.Rows[2].Delete;

b.ExcelApplication1.ActiveSheet.Columns[1].Delete;

C# 操作Excel之Delphi控件方法20)打印預(yù)覽工作表：

ExcelApplication1.ActiveSheet.PrintPreview;

C# 操作Excel之Delphi控件方法21)打印輸出工作表：

ExcelApplication1.ActiveSheet.PrintOut;

C# 操作Excel之Delphi控件方法22)工作表保存：

ifnotExcelApplication1.ActiveWorkBook.Savedthen

ExcelApplication1.ActiveSheet.PrintPreview;

C# 操作Excel之Delphi控件方法23)工作表另存為：

ExcelApplication1.SaveAs('C:\Excel\Demo1.xls');

C# 操作Excel之Delphi控件方法24)放棄存盤：

ExcelApplication1.ActiveWorkBook.Saved:=True;

C# 操作Excel之Delphi控件方法25)關(guān)閉工作簿：

ExcelApplication1.WorkBooks.Close;

C# 操作Excel之Delphi控件方法26)退出Excel：

ExcelApplication1.Quit;

ExcelApplication1.Disconnect;

C# 操作Excel之Delphi控件方法的基本情況就向你介紹到這里，希望對(duì)你了解和學(xué)習(xí)C# 操作Excel之Delphi控件方法有所幫助。

網(wǎng)頁(yè)題目：C#操作Excel之Delphi控件方法
分享鏈接：http://fisionsoft.com.cn/article/dhdcihc.html

新聞中心

其他資訊