程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> .NET網頁編程 >> C# >> C#入門知識 >> 轉載:C# Office 開發,

轉載:C# Office 開發,

編輯:C#入門知識

轉載:C# Office 開發,


原文地址:http://blog.sina.com.cn/s/blog_604fb7ae0100x2s7.html

 

中小企業辦公自動化系統都需要有與微軟辦公軟件連接的功能,如把數據導入到電子表格、Word等功能。C#.NET在Office方面提供了強大的功能,只要導入 Microsoft.Office.Interop.Excel 命名空間並調用此命名空間下的類,就可以在程序調用Excel、Word。

  (一)Excel開發

   首先導入 Microsoft.Office.Interop.Excel 命名空間

   需要的類

   _Application excel = new ApplicationClass();  //實例化對象

   int rowIndex = 6;
   int colIndex = 0;

   _Workbook xBk;
   _Worksheet xSt;

   xBk = excel.Workbooks.Add(true);
   xSt = (Microsoft.Office.Interop.Excel._Worksheet)xBk.ActiveSheet;

   //取得列標題
   for (int i = 0; i < dgvYingShouAmount.Columns.Count; i++){
      colIndex++;
      excel.Cells[rowIndex, colIndex] = Convert.ToString(dgvYingShouAmount.Columns[i].HeaderText);
   }

   //取得表格中的數據

   for (int i = 0; i < dgvYingShouAmount.Rows.Count; i++){
      rowIndex++;
      colIndex = 0;
      for (int j = 0; j < dgvYingShouAmount.Columns.Count; j++){
         colIndex++;

         excel.Cells[rowIndex, colIndex] =Convert.ToString(dgvYingShouAmount.Rows[i].Cells[j].Value);
         xSt.get_Range(excel.Cells[rowIndex, colIndex], excel.Cells[rowIndex, colIndex]).HorizontalAlignment = XlHAlign.xlHAlignCenter;
      }     
   }

    excel.Cells[1, 1] = "***有限公司";
    excel.Cells[2, 1] = "地址";
    excel.Cells[3, 1] = "電話 傳真";
    excel.Cells[4, 1] = "客戶對賬單";
    excel.Cells[5, 1] = "操作日期:" + dtpStartDate.Value.ToString("yyyy-MM-dd") + "/" + dtpEndDate.Value.ToString("yyyy-MM-dd");

    // 
    //設置整個報表的標題格式 
    // 
    xSt.get_Range(excel.Cells[1, 1], excel.Cells[1, 1]).Font.Bold = true;
    xSt.get_Range(excel.Cells[1, 1], excel.Cells[1, 1]).Font.Size = 22;

    xSt.get_Range(excel.Cells[3, 1], excel.Cells[3, 1]).Font.Bold = true;

    //設置報表表格為最適應寬度 
    // 
    xSt.get_Range(excel.Cells[6, 2], excel.Cells[rowIndex, colIndex]).Select();
    xSt.get_Range(excel.Cells[6, 2], excel.Cells[rowIndex, colIndex]).Columns.AutoFit();

    //設置整個報表的標題為跨列居中 
    // 
    xSt.get_Range(excel.Cells[1, 1], excel.Cells[1, colIndex]).Select();
    xSt.get_Range(excel.Cells[1, 1], excel.Cells[1, colIndex]).HorizontalAlignment = XlHAlign.xlHAlignCenterAcrossSelection;
    xSt.get_Range(excel.Cells[2, 1], excel.Cells[2, colIndex]).Select();
    xSt.get_Range(excel.Cells[2, 1], excel.Cells[2, colIndex]).HorizontalAlignment = XlHAlign.xlHAlignCenterAcrossSelection;
    xSt.get_Range(excel.Cells[3, 1], excel.Cells[3, colIndex]).Select();
    xSt.get_Range(excel.Cells[3, 1], excel.Cells[3, colIndex]).HorizontalAlignment = XlHAlign.xlHAlignCenterAcrossSelection;
    xSt.get_Range(excel.Cells[4, 1], excel.Cells[4, colIndex]).Select();
    xSt.get_Range(excel.Cells[4, 1], excel.Cells[4, colIndex]).HorizontalAlignment = XlHAlign.xlHAlignCenterAcrossSelection;
    xSt.get_Range(excel.Cells[5, 1], excel.Cells[5, colIndex]).Select();
    xSt.get_Range(excel.Cells[5, 1], excel.Cells[5, colIndex]).HorizontalAlignment = XlHAlign.xlHAlignCenterAcrossSelection;
    // 
    //繪制邊框 
    // 
    xSt.get_Range(excel.Cells[6, 1], excel.Cells[rowIndex, colIndex]).Borders.LineStyle = 1;
    xSt.get_Range(excel.Cells[6, 1], excel.Cells[rowIndex, colIndex]).Borders[Microsoft.Office.Interop.Excel.XlBordersIndex.xlEdgeLeft].Weight = Microsoft.Office.Interop.Excel.XlBorderWeight.xlThick;//設置左邊線加粗 
    xSt.get_Range(excel.Cells[6, 1], excel.Cells[rowIndex, colIndex]).Borders[Microsoft.Office.Interop.Excel.XlBordersIndex.xlEdgeTop].Weight = Microsoft.Office.Interop.Excel.XlBorderWeight.xlThick;//設置上邊線加粗 
    xSt.get_Range(excel.Cells[6, 1], excel.Cells[rowIndex, colIndex]).Borders[Microsoft.Office.Interop.Excel.XlBordersIndex.xlEdgeRight].Weight = Microsoft.Office.Interop.Excel.XlBorderWeight.xlThick;//設置右邊線加粗 
    xSt.get_Range(excel.Cells[6, 1], excel.Cells[rowIndex, colIndex]).Borders[Microsoft.Office.Interop.Excel.XlBordersIndex.xlEdgeBottom].Weight = Microsoft.Office.Interop.Excel.XlBorderWeight.xlThick;//設置下邊線加粗

    excel.Visible = true;

    string file = "保存的路徑";
    xBk.SaveCopyAs(file); 

 

 

以下為我仿寫的代碼:

 1 using System;
 2 using System.Collections.Generic;
 3 using System.ComponentModel;
 4 using System.Data;
 5 using System.Drawing;
 6 using System.Text;
 7 using System.Windows.Forms;
 8 
 9 using MSExcel = Microsoft.Office.Interop.Excel;
10 
11 namespace testoffice
12 {
13     public partial class Form1 : Form
14     {
15         public Form1()
16         {
17             InitializeComponent();
18         }
19 
20         private void button1_Click(object sender, EventArgs e)
21         {
22             MSExcel._Application excel = new MSExcel.ApplicationClass();
23 
24             int rowIndex = 6, colIndex = 0, myCCount = 10, myRCount = 3;
25 
26             MSExcel._Workbook xBk = null;
27             MSExcel._Worksheet xSt = null;
28 
29             xBk = excel.Workbooks.Add(true);
30             xSt = (MSExcel._Worksheet)xBk.ActiveSheet;
31 
32             //
33             for (int i = 0; i < myCCount; i++)
34             {
35                 colIndex++;
36                 xSt.Cells[rowIndex, colIndex] = "標題" + colIndex.ToString();
37             }
38 
39             //
40             for (int i = 0; i < myRCount; i++)
41             {
42                 rowIndex++;
43                 colIndex = 0;
44                 for (int j = 0; j < myCCount; j++)
45                 {
46                     colIndex++;
47                     xSt.Cells[rowIndex, colIndex] = "內容" + rowIndex.ToString() + ":" + colIndex.ToString();
48                     xSt.get_Range(xSt.Cells[rowIndex, colIndex], xSt.Cells[rowIndex, colIndex]).HorizontalAlignment = MSExcel.XlHAlign.xlHAlignCenter;
49                 }
50             }
51 
52             xSt.Cells[1, 1] = "宇宙無限公司";
53             xSt.Cells[2, 1] = "地址";
54             xSt.Cells[3, 1] = "電話 傳真";
55             xSt.Cells[4, 1] = "客戶對賬單";
56             xSt.Cells[5, 1] = "操作日期:" + DateTime.Now.ToLongTimeString();
57 
58             //
59             xSt.get_Range(xSt.Cells[1, 1], xSt.Cells[1, 1]).Font.Bold = true;
60             xSt.get_Range(xSt.Cells[1, 1], xSt.Cells[1, 1]).Font.Size = 22;
61             xSt.get_Range(xSt.Cells[3, 1], xSt.Cells[3, 1]).Font.Bold = true;
62 
63             xSt.get_Range(xSt.Cells[6, 2], xSt.Cells[1, 1]).Font.Bold = true;
64 
65             //
66             for (int i = 1; i < 6; i++)
67             {
68                 xSt.get_Range(xSt.Cells[i, 1], xSt.Cells[i, colIndex]).Select();
69                 xSt.get_Range(xSt.Cells[i, 1], xSt.Cells[i, colIndex]).HorizontalAlignment = MSExcel.XlHAlign.xlHAlignCenterAcrossSelection;
70             }
71 
72             //
73             xSt.get_Range(xSt.Cells[6, 1], xSt.Cells[rowIndex, colIndex]).Borders.LineStyle = 1;
74             xSt.get_Range(xSt.Cells[6, 1], xSt.Cells[rowIndex, colIndex]).Borders[Microsoft.Office.Interop.Excel.XlBordersIndex.xlEdgeLeft].Weight = MSExcel.XlBorderWeight.xlThick;
75             xSt.get_Range(xSt.Cells[6, 1], xSt.Cells[rowIndex, colIndex]).Borders[Microsoft.Office.Interop.Excel.XlBordersIndex.xlEdgeTop].Weight = MSExcel.XlBorderWeight.xlThick;
76             xSt.get_Range(xSt.Cells[6, 1], xSt.Cells[rowIndex, colIndex]).Borders[Microsoft.Office.Interop.Excel.XlBordersIndex.xlEdgeRight].Weight = MSExcel.XlBorderWeight.xlThick;
77             xSt.get_Range(xSt.Cells[6, 1], xSt.Cells[rowIndex, colIndex]).Borders[Microsoft.Office.Interop.Excel.XlBordersIndex.xlEdgeBottom].Weight = MSExcel.XlBorderWeight.xlThick;
78 
79             excel.Visible = true;
80             string file = "e:/testexcel.xlsx";
81             xBk.SaveCopyAs(file);
82         }
83     }
84 }

 

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved