1. 程式人生 > >C#操作Excel初探

C#操作Excel初探

    最近一段時間正好在做winform匯出Excel報表的問題,學習了一下C#操作Excel的一些方法(如:向Excel中插入圖片;刪除Excel指定sheet中的某行或某列,在Excel指定的單元格中畫線等)

一、新增引用
    新增com元件(Microsoft Office 11.0 Object Library )名稱空間為Microsoft.Office.Interop.Excel
    新增Excel.exe引用預設路徑為C:/Program Files/Microsoft Office/OFFICE11/Excel.exe

二、Excel控制類
using System;
using System.Collections.Generic;
using System.Text;
using System.Windows.Forms;
using Excel = Microsoft.Office.Interop.Excel;

namespace ExcelOperation
{
    public class ExcelControl
    {
        private Excel.Application m_objExcel = null;
        private Excel.Workbooks m_objBooks = null;
        private Excel._Workbook m_objBook = null;
        private Excel.Sheets m_objSheets = null;
        private Excel._Worksheet m_objSheet = null;
        private Excel.Range m_objRange = null;
        private object m_objOpt = System.Reflection.Missing.Value;

        /// <summary>
        /// 開啟沒有模板的操作。
        /// </summary>
        public void Open()
        {
            this.Open(String.Empty);
        }

        /// <summary>
        /// 功能:實現Excel應用程式的開啟
        /// </summary>
        /// <param name="TemplateFilePath">模板檔案物理路徑</param>
        public void Open(string TemplateFilePath)
        {
            //開啟物件
            m_objExcel = new Excel.Application();
            m_objExcel.Visible = false;
            m_objExcel.DisplayAlerts = false;

            if (m_objExcel.Version != "11.0")
            {
                MessageBox.Show("您的 Excel 版本不是 11.0 (Office 2003),操作可能會出現問題。");
                m_objExcel.Quit();
                return;
            }

            m_objBooks = (Excel.Workbooks)m_objExcel.Workbooks;
            if (TemplateFilePath.Equals(String.Empty))
            {
                m_objBook = (Excel._Workbook)(m_objBooks.Add(m_objOpt));
            }
            else
            {
                m_objBook = m_objBooks.Open(TemplateFilePath, m_objOpt, m_objOpt, m_objOpt, m_objOpt,
                  m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt);
            }
            m_objSheets = (Excel.Sheets)m_objBook.Worksheets;
            m_objSheet = (Excel._Worksheet)(m_objSheets.get_Item(1));
            m_objExcel.WorkbookBeforeClose += new Excel.AppEvents_WorkbookBeforeCloseEventHandler(m_objExcel_WorkbookBeforeClose);
        }

        private void m_objExcel_WorkbookBeforeClose(Excel.Workbook m_objBooks, ref bool _Cancel)
        {
            MessageBox.Show("儲存完畢!");
        }

        /// <summary>
        /// 將圖片插入到指定的單元格位置。
        /// 注意:圖片必須是絕對物理路徑
        /// </summary>
        /// <param name="RangeName">單元格名稱,例如:B4</param>
        /// <param name="PicturePath">要插入圖片的絕對路徑。</param>
        public void InsertPicture(string RangeName, string PicturePath)
        {
            m_objRange = m_objSheet.get_Range(RangeName, m_objOpt);
            m_objRange.Select();
            Excel.Pictures pics = (Excel.Pictures)m_objSheet.Pictures(m_objOpt);
            pics.Insert(PicturePath, m_objOpt);
        }

        /// <summary>
        /// 將圖片插入到指定的單元格位置,並設定圖片的寬度和高度。
        /// 注意:圖片必須是絕對物理路徑
        /// </summary>
        /// <param name="RangeName">單元格名稱,例如:B4</param>
        /// <param name="PicturePath">要插入圖片的絕對路徑。</param>
        /// <param name="PictuteWidth">插入後,圖片在Excel中顯示的寬度。</param>
        /// <param name="PictureHeight">插入後,圖片在Excel中顯示的高度。</param>
        public void InsertPicture(string RangeName, string PicturePath, float PictuteWidth, float PictureHeight)
        {
            m_objRange = m_objSheet.get_Range(RangeName, m_objOpt);
            m_objRange.Select();
            float PicLeft, PicTop;
            PicLeft = Convert.ToSingle(m_objRange.Left);
            PicTop = Convert.ToSingle(m_objRange.Top);
            //引數含義:
            //圖片路徑
            //是否連結到檔案
            //圖片插入時是否隨文件一起儲存
            //圖片在文件中的座標位置(單位:points)
            //圖片顯示的寬度和高度(單位:points)
            //引數詳細資訊參見:http://msdn2.microsoft.com/zh-cn/library/aa221765(office.11).aspx
            m_objSheet.Shapes.AddPicture(PicturePath, Microsoft.Office.Core.MsoTriState.msoFalse,
              Microsoft.Office.Core.MsoTriState.msoTrue, PicLeft, PicTop, PictuteWidth, PictureHeight);
        }

        /// <summary>
        /// 將圖片填充到Excel中的某個或某些單元格中
        /// 注意:圖片必須是絕對物理路徑
        /// </summary>
        /// <param name="RangeName">單元格名稱,例如:B4</param>
        /// <param name="PicturePath">要插入圖片的絕對路徑。</param>
        /// <param name="PictuteWidth">插入後,圖片在Excel中顯示的寬度。</param>
        /// <param name="PictureHeight">插入後,圖片在Excel中顯示的高度。</param>

        /// <summary>
        /// 將圖片填充到Excel中的某個或某些單元格中
        /// </summary>
        /// <param name="BeginRangeName">插入的開始單元格</param>
        /// <param name="EndRangeName">插入的結束單元格</param>
        /// <param name="PicturePath">插入圖片的絕對物理路徑</param>
        /// <param name="IsMergeCells">是否合併上面的單元格</param>
        public void InsertPicture(string BeginRangeName,string EndRangeName, string PicturePath,bool IsMergeCells)
        {
            m_objRange = m_objSheet.get_Range(BeginRangeName, EndRangeName);

            //計算單元格的寬和高
            float PictuteWidth, PictureHeight;
            PictuteWidth = Convert.ToSingle(m_objRange.Width);
            PictureHeight = Convert.ToSingle(m_objRange.Height);

            if (IsMergeCells)
            {
                //合併單元格
                m_objRange.Merge(System.Reflection.Missing.Value);
                m_objRange = m_objSheet.get_Range(BeginRangeName, BeginRangeName);
            }
            m_objRange.Select();
            float PicLeft, PicTop;
            PicLeft = Convert.ToSingle(m_objRange.Left);
            PicTop = Convert.ToSingle(m_objRange.Top);
            //引數含義:
            //圖片路徑
            //是否連結到檔案
            //圖片插入時是否隨文件一起儲存
            //圖片在文件中的座標位置(單位:points)
            //圖片顯示的寬度和高度(單位:points)
            //引數詳細資訊參見:http://msdn2.microsoft.com/zh-cn/library/aa221765(office.11).aspx
            m_objSheet.Shapes.AddPicture(PicturePath, Microsoft.Office.Core.MsoTriState.msoFalse,
              Microsoft.Office.Core.MsoTriState.msoTrue, PicLeft, PicTop, PictuteWidth, PictureHeight);
        }

        /// <summary>
        ///
        /// </summary>
        /// <param name="BeginRangeName"></param>
        /// <param name="EndRangeName"></param>
        /// <param name="IsMergeCells"></param>
        public void InsertLine(string BeginRangeName, string EndRangeName, bool IsMergeCells)
        {
            m_objRange = m_objSheet.get_Range(BeginRangeName, EndRangeName);

            //計算單元格的寬和高
            float PictureWidth, PictureHeight;
            PictureWidth = Convert.ToSingle(m_objRange.Width);
            PictureHeight = Convert.ToSingle(m_objRange.Height);

            if (IsMergeCells)
            {
                //合併單元格
                m_objRange.Merge(System.Reflection.Missing.Value);
                m_objRange = m_objSheet.get_Range(BeginRangeName, BeginRangeName);
            }
            m_objRange.Select();
            float PicLeft, PicTop;
            PicLeft = Convert.ToSingle(m_objRange.Left);
            PicTop = Convert.ToSingle(m_objRange.Top);
            //引數含義:
            //線的起點(X,Y)
            //線的終點(X,Y)
            m_objSheet.Shapes.AddLine(PicLeft,PicTop,PicLeft + PictureWidth,PicTop +PictureHeight);
        }

        /// <summary>
        /// 將Excel檔案儲存到指定的目錄,目錄必須事先存在,檔名稱不一定要存在。
        /// </summary>
        /// <param name="OutputFilePath">要儲存成的檔案的全路徑。</param>
        public void SaveFile(string OutputFilePath)
        {
            m_objBook.SaveAs(OutputFilePath, m_objOpt, m_objOpt,
              m_objOpt, m_objOpt, m_objOpt, Excel.XlSaveAsAccessMode.xlNoChange,
              m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt);

            this.Close();
        }
        /// <summary>
        /// 關閉應用程式
        /// </summary>
        private void Close()
        {
            m_objBook.Close(false, m_objOpt, m_objOpt);
            m_objExcel.Quit();
        }

        /// <summary>
        /// 釋放所引用的COM物件。注意:這個過程一定要執行。
        /// </summary>
        public void Dispose()
        {
            ReleaseObj(m_objSheets);
            ReleaseObj(m_objBook);
            ReleaseObj(m_objBooks);
            ReleaseObj(m_objExcel);
            System.GC.Collect();
            System.GC.WaitForPendingFinalizers();
        }
        /// <summary>
        /// 釋放物件,內部呼叫
        /// </summary>
        /// <param name="o"></param>
        private void ReleaseObj(object o)
        {
            try
            {
                System.Runtime.InteropServices.Marshal.ReleaseComObject(o);
            }
            catch { }
            finally { o = null; }
        }

        /// <summary>
        /// 刪除指定sheet下的指定行
        /// </summary>
        /// <param name="SheetIndex">sheet索引</param>
        /// <param name="DeleteRowIndex">行索引</param>
        public void DeleteRow(int SheetIndex, int DeleteRowIndex)
        {
            m_objSheet = (Excel._Worksheet)(m_objSheets.get_Item(SheetIndex));
            m_objRange = (Excel.Range)m_objSheet.Rows[DeleteRowIndex, System.Reflection.Missing.Value];
            m_objRange.EntireRow.Delete(Excel.XlDirection.xlToRight);
        }

        /// <summary>
        /// 刪除指定sheet下的指定列
        /// </summary>
        /// <param name="SheetIndex">sheet索引</param>
        /// <param name="DeleteColumnIndex">列索引</param>
        public void DeleteColumn(int SheetIndex, int DeleteColumnIndex)
        {
            m_objSheet = (Excel._Worksheet)(m_objSheets.get_Item(SheetIndex));
            m_objRange = (Excel.Range)m_objSheet.Columns[DeleteColumnIndex, System.Reflection.Missing.Value];
            m_objRange.EntireColumn.Delete(Excel.XlDirection.xlDown);
        }
    }
}


三、Excel操作方法呼叫
1.插入圖片和線呼叫
            PictureInExcel ipt = new PictureInExcel();
            ipt.Open();
            //ipt.InsertPicture("B2", @"C:/www.jpg");
            //ipt.InsertPicture("B8", @"C:/www.jpg", 1000, 800);
            ipt.InsertPicture("B2","F8", @"C:/www.jpg",true);
            ipt.InsertLine("B9", "F15", true);
            ipt.InsertPicture("B16", "F22", @"C:/www.jpg", false);
            ipt.InsertLine("B23", "F29", false);
            ipt.SaveFile(@"C:/ExcelTest.xls");
            ipt.Dispose();

2.刪除行方法呼叫
            PictureInExcel ipt = new PictureInExcel();
            ipt.Open(@"C:/ExcelTest.xls");
            ipt.DeleteRow(1,1);
            ipt.SaveFile(@"C:/ExcelTest.xls");
            ipt.Dispose();

3.刪除列方法呼叫
            PictureInExcel ipt = new PictureInExcel();
            ipt.Open(@"C:/ExcelTest.xls");
            ipt.DeleteColumn(1, 1);
            ipt.SaveFile(@"C:/ExcelTest.xls");
            ipt.Dispose();


四、參考資料
    孟子E章的 《C#向Excel報表中插入圖片的2種方法》等