Microsoft.Office.Interop.Excel的用法
1)ApplicationClass ExcelApp = New ApplicationClass();
2) 更改 Excel 標(biāo)題欄:?
ExcelApp.Caption := '應(yīng)用程序調(diào)用 Microsoft Excel';?
3) 添加新工作簿:?
ExcelApp.WorkBooks.Add;?
4) 打開已存在的工作簿:?
?ExcelApp.WorkBooks.Open( 'C:\Excel\Demo.xls' );?
5) 設(shè)置第2個(gè)工作表為活動(dòng)工作表:?
ExcelApp.WorkSheets[2].Activate; 或?
?ExcelApp.WorksSheets[ 'Sheet2' ].Activate;?
6) 給單元格賦值:?
?ExcelApp.Cells[1,4].Value := '第一行第四列';?
7) 設(shè)置指定列的寬度(單位:字符個(gè)數(shù)),以第一列為例:?
?ExcelApp.ActiveSheet.Columns[1].ColumnsWidth := 5;?
8) 設(shè)置指定行的高度(單位:磅)(1磅=0.035厘米),以第二行為例:?
?ExcelApp.ActiveSheet.Rows[2].RowHeight := 1/0.035; // 1厘米?
9) 在第8行之前插入分頁(yè)符:?
?ExcelApp.WorkSheets[1].Rows[8].PageBreak := 1;?
10) 在第8列之前刪除分頁(yè)符:?
ExcelApp.ActiveSheet.Columns[4].PageBreak := 0;?
11) 指定邊框線寬度:?
?ExcelApp.ActiveSheet.Range[ 'B3:D4' ].Borders[2].Weight := 3;?
1-左 2-右 3-頂 4-底 5-斜( \ ) 6-斜( / )?
12) 清除第一行第四列單元格公式:?
ExcelApp.ActiveSheet.Cells[1,4].ClearContents;?
13) 設(shè)置第一行字體屬性:?
ExcelApp.ActiveSheet.Rows[1].Font.Name := '隸書';?
?ExcelApp.ActiveSheet.Rows[1].Font.Color := clBlue;?
?ExcelApp.ActiveSheet.Rows[1].Font.Bold := True;?
ExcelApp.ActiveSheet.Rows[1].Font.UnderLine := True;?
14) 進(jìn)行頁(yè)面設(shè)置:?
a.頁(yè)眉:?
ExcelApp.ActiveSheet.PageSetup.CenterHeader := '報(bào)表演示';?
b.頁(yè)腳:?
ExcelApp.ActiveSheet.PageSetup.CenterFooter := '第&P頁(yè)';?
c.頁(yè)眉到頂端邊距2cm:?
ExcelApp.ActiveSheet.PageSetup.HeaderMargin := 2/0.035;?
d.頁(yè)腳到底端邊距3cm:?
?ExcelApp.ActiveSheet.PageSetup.HeaderMargin := 3/0.035;?
?e.頂邊距2cm:?
ExcelApp.ActiveSheet.PageSetup.TopMargin := 2/0.035;?
?f.底邊距2cm:?
?ExcelApp.ActiveSheet.PageSetup.BottomMargin := 2/0.035;?
?g.左邊距2cm:?
?ExcelApp.ActiveSheet.PageSetup.LeftMargin := 2/0.035;?
?h.右邊距2cm:?
?ExcelApp.ActiveSheet.PageSetup.RightMargin := 2/0.035;?
?i.頁(yè)面水平居中:?
?ExcelApp.ActiveSheet.PageSetup.CenterHorizontally := 2/0.035;?
j.頁(yè)面垂直居中:?
ExcelApp.ActiveSheet.PageSetup.CenterVertically := 2/0.035;?
k.打印單元格網(wǎng)線:?
?ExcelApp.ActiveSheet.PageSetup.PrintGridLines := True;?
15) 拷貝操作:?
a.拷貝整個(gè)工作表:?
?ExcelApp.ActiveSheet.Used.Range.Copy;?
?b.拷貝指定區(qū)域:?
?ExcelApp.ActiveSheet.Range[ 'A1:E2' ].Copy;?
?c.從A1位置開始粘貼:?
?ExcelApp.ActiveSheet.Range.[ 'A1' ].PasteSpecial;?
?d.從文件尾部開始粘貼:?
?ExcelApp.ActiveSheet.Range.PasteSpecial;
16) 插入一行或一列:?
a. ExcelApp.ActiveSheet.Rows[2].Insert;?
?b. ExcelApp.ActiveSheet.Columns[1].Insert;?
17) 刪除一行或一列:?
?a. ExcelApp.ActiveSheet.Rows[2].Delete;?
?b. ExcelApp.ActiveSheet.Columns[1].Delete;?
18) 打印預(yù)覽工作表:?
?ExcelApp.ActiveSheet.PrintPreview;?
19) 打印輸出工作表:?
?ExcelApp.ActiveSheet.PrintOut;?
20) 工作表保存:?
?if not ExcelApp.ActiveWorkBook.Saved then?
?ExcelApp.ActiveSheet.PrintPreview;?
21) 工作表另存為:?
ExcelApp.SaveAs( 'C:\Excel\Demo1.xls' );?
22) 放棄存盤:?
ExcelApp.ActiveWorkBook.Saved := True;?
23) 關(guān)閉工作簿:?
?ExcelApp.WorkBooks.Close;?
24) 退出 Excel:?
?ExcelApp.Quit;
?原著博客地址? http://blog.sina.com.cn/s/blog_7725bc930100ufot.html
轉(zhuǎn)載于:https://www.cnblogs.com/tianyiwuying/p/3682530.html
總結(jié)
以上是生活随笔為你收集整理的Microsoft.Office.Interop.Excel的用法的全部?jī)?nèi)容,希望文章能夠幫你解決所遇到的問(wèn)題。
- 上一篇: “ == “运算符与equals()方法
- 下一篇: SQL计算表的列数