C# 操作Excel之Delphi控件方法
C# 操作Excel之Delphi控件方法
在Form中分別放入ExcelApplication,ExcelWorkbook和ExcelWorksheet。
C# 操作Excel之Delphi控件方法1）打開Excel
ExcelApplication1.Connect;
C# 操作Excel之Delphi控件方法2)顯示當前窗口：
ExcelApplication1.Visible[0]:=True;
C# 操作Excel之Delphi控件方法3)更改Excel標題欄：
ExcelApplication1.Caption:='應用程序調用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)設置第2個工作表為活動工作表：
- ExcelApplication1.WorkSheets[2].Activate;或
- ExcelApplication1.WorksSheets['Sheet2'].Activate;
C# 操作Excel之Delphi控件方法8)給單元格賦值：
ExcelApplication1.Cells[1,4].Value:='***行第四列';
C# 操作Excel之Delphi控件方法9)設置指定列的寬度（單位：字符個數），以***列為例：
ExcelApplication1.ActiveSheet.Columns[1].ColumnsWidth:=5;
C# 操作Excel之Delphi控件方法10)設置指定行的高度（單位：磅）（1磅＝0.035厘米），以第二行為例：
ExcelApplication1.ActiveSheet.Rows[2].RowHeight:=1/0.035;//1厘米
C# 操作Excel之Delphi控件方法11)在第8行之前插入分頁符：
ExcelApplication1.WorkSheets[1].Rows[8].PageBreak:=1;
C# 操作Excel之Delphi控件方法12)在第8列之前刪除分頁符：
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)設置***行字體屬性：
- 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)進行頁面設置：
a.頁眉：
ExcelApplication1.ActiveSheet.PageSetup.CenterHeader:='報表演示';
b.頁腳：
ExcelApplication1.ActiveSheet.PageSetup.CenterFooter:='第&P頁';
c.頁眉到頂端邊距2cm：
ExcelApplication1.ActiveSheet.PageSetup.HeaderMargin:=2/0.035;
d.頁腳到底端邊距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.頁面水平居中：
ExcelApplication1.ActiveSheet.PageSetup.CenterHorizontally:=2/0.035;
j.頁面垂直居中：
ExcelApplication1.ActiveSheet.PageSetup.CenterVertically:=2/0.035;
k.打印單元格網線：
ExcelApplication1.ActiveSheet.PageSetup.PrintGridLines:=True;
C# 操作Excel之Delphi控件方法17)拷貝操作：
a.拷貝整個工作表：
ExcelApplication1.ActiveSheet.Used.Range.Copy;
b.拷貝指定區域：
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)打印預覽工作表：
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)關閉工作簿：
ExcelApplication1.WorkBooks.Close;
C# 操作Excel之Delphi控件方法26)退出Excel：
ExcelApplication1.Quit;
ExcelApplication1.Disconnect;
C# 操作Excel之Delphi控件方法的基本情況就向你介紹到這里，希望對你了解和學習C# 操作Excel之Delphi控件方法有所幫助。
【編輯推薦】
