C#如何在Form中嵌入并且操作Excel表格

来源:百度文库 编辑:神马文学网 时间:2024/04/29 03:36:57
2007-03-22  转帖说明:本文未经实际测试。有何问题尚未知。2010-10-25 http://wenwen.soso.com/z/q223710107.htm?ri=2263&rq=174056802&uid=0&ch=w.xg.llyjj    另一篇

C#如何在Form中嵌入并且操作Excel表格

网上比较多讲述如何操作excel表的文章,但都是启动excel的窗口来打开excel数据文件。有时候需要把excel表嵌入到自己程序的form中,给客户一个不用切换窗口的操作界面,似乎更好。这在vc中用ole技术很容易实现,但是在c#中方法就不一样啦。下面将就此进行阐述。

一、首先简要回顾一下如何操作excel表

  先要添加对Excel的引用。选择项目-〉添加引用-〉COM-〉添加Microsoft Excel 9.0。(不同的office讲会有不同版本的dll文件)。 


   using Excel;
   using System.Reflection;
   
   //产生一个Excel.Application的新进程
   Excel.Application app = new Excel.Application();
   if (app == null) 
   {
    statusBar1.Text = "ERROR: EXCEL couldn't be started!";
    return ;
   }
   
   app.Visible = true; //如果只想用程序控制该excel而不想让用户操作时候,可以设置为false
   app.UserControl = true;
   
   Workbooks workbooks =app.Workbooks;
  
   _Workbook workbook = workbooks.Add(XlWBATemplate.xlWBATWorksheet); //根据模板产生新的workbook
//  _Workbook workbook = workbooks.Add("c:\\a.xls"); //或者根据绝对路径打开工作簿文件a.xls 

 

   Sheets sheets = workbook.Worksheets;
   _Worksheet worksheet = (_Worksheet) sheets.get_Item(1);
   if (worksheet == null) 
   {
    statusBar1.Text =  "ERROR: worksheet == null";
    return;
   }

   // This paragraph puts the value 5 to the cell G1
   Range range1 = worksheet.get_Range("A1", Missing.Value);
   if (range1 == null) 
   {
    statusBar1.Text =  "ERROR: range == null";
    return;
   }
   const int nCells = 2345;
   range1.Value2 = nCells;
  


二、将Excel用户界面嵌入到自己的Windows Form中 

 

      由于目前,C#和vb.net都不支持OLE技术(参见微软支持中心Info:304562),,所以只有使用WebBrowser控件来完成此功能。(以下方法参见微软支持中心Howto:304662)
      1、右击工具箱,选择自定义工具箱,添加COM组件,选择“Microsoft Web 浏览器”(对应文件是\winnt\system32\shdocvw.dll),确定。在工具箱中将会出现文本为Explorer的WebBroser控件图标。
      2、在Form1中添加WebBrowser控件。(对象名却省是axWebBrowser1)
      3、假定要打开的excel文件是: c:\a.xls。
       string strFileName = @"c:\a.xls";
     Object refmissing = System.Reflection.Missing.Value;
     axWebBrowser1.Navigate(strFileName, ref refmissing , ref refmissing , ref refmissing , ref refmissing);
    值得注意的是用WebBrowser控件不支持菜单合并,也就是说无法把Excel表的菜单带入到我们的程序中。这是相对于OLE实现方法的一大缺点。幸好提供了可以把工具栏添加进来的功能,通过工具栏可以进行许多Excel专有的操作。
     //下面这句可以将excel本身的工具调添加进来
    axWebBrowser1.ExecWB(SHDocVw.OLECMDID.OLECMDID_HIDETOOLBARS, SHDocVw.OLECMDEXECOPT.OLECMDEXECOPT_DONTPROMPTUSER,ref refmissing , ref refmissing);
    
三、回到本文提出的问题,如何操作嵌入的Excel?

   首先需要明白,用WebBrowser“装载”Excel"表,实际上仍然是在新的进程空间中运行Excel.exe。可以用任务管理器观察。因此,只要我们能够获取Excel.Application对象,就能像上文一中所说的那样操作Excel数据。
   幸好可以通过WebBrowser的方法NavigateComplete提供的事件参数e来访问Excel.Application。 


  public void axWebBrowser1_NavigateComplete2(object sender, AxSHDocVw.DWebBrowserEvents2_NavigateComplete2Event e)
  {
   Object o = e.pDisp;
   Object oDocument = o.GetType().InvokeMember("Document",BindingFlags.GetProperty,null,o,null);
   Object oApplication = o.GetType().InvokeMember("Application",BindingFlags.GetProperty,null,oDocument,null);
      //Object oName = o.GetType().InvokeMember("Name",BindingFlags.GetProperty ,null,oApplication,null); 

 

   //由于打开的是excel文件,所以这里的oApplication 其实就是Excel.Application
   Excel.Application eApp =(Excel.Application)oApplication;//这样就可以象上文中所述来操作Excel了。
  }

四、包含该webbrowser的form退出时候,如何确保excel进程也退出?(参见microsoft帮助中心kb317109)

  由于WebBrowser只不过是对Excel表的浏览,而Excel在单独的进程中运行。所以要保证对该Excel对象eApp及其相应的所有成员变量都释放引用,才能保证在Form退出时excel进程跟着退出。这一点在一个程序需要多次打开关闭excel表时尤为重要。 


      Excel.Application oApp;
      Excel.Workbooks oBooks;
      Excel.Workbook oBook;
      Excel.Worksheet oSheet;
      ...........
    private void ExcelExit()
    {
       NAR(oSheet);
       oBook.Close(False);
       NAR(oBook);
       NAR(oBooks);
       oApp.Quit();
       NAR(oApp); 

 

       Debug.WriteLine("Sleeping...");
       System.Threading.Thread.Sleep(5000);
       Debug.WriteLine("End Excel");
    }
  private void NAR(Object o)
  {
        try{System.Runtime.InteropServices.Marshal.ReleaseComObject(o);}
        catch{}
        finally{o = null;}
    }
  

经过试验,我发现除了释放这些变量以外,必须把该axWebBroswer1也销毁掉,Excel进程才退出。否则的话,即使让axWebBroser1去Navigate空内容"about:blank", excel进程仍然不会退出。因此应该将axWebBroser1所在的Form关闭掉,或者直接调用axWebBrowser1.Dispose();
  如果还是其它问题导致不能正常退出,就只有调用垃圾回收了。
  GC.Collect();  //********************************经过修改正常调试通过的代码*********************************************// //********************************2010-10-26*************************************************************//using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using Excel;using System.Reflection;
//本案例为Office2003版 + Microsoft Web 浏览器 + Visual Studio 2008 + Windows XP SP3
//********************步骤说明***************************************************//
//新建工程名称 NewOpen_Excel ,新建 窗体 Form1
//右击工具箱,选择自定义工具箱,添加COM组件,选择“Microsoft Web 浏览器”(对应文件是\winnt\system32\shdocvw.dll),确定。在工具箱中将会出现WebBroser控件图标。
//添加对Excel的引用。右键选择工程项目-〉添加引用-〉COM-〉添加Microsoft Excel 11.0。(不同的office会有不同版本的dll文件)。
//再添加 Microsoft.Office.Interop.Excel引用
//Microsoft WebBrowser 控件尺寸决定了 所显示工作簿的区域,无工作簿的菜单条,工具栏可用代码添加****
//需要在Excel文档中用宏代码限制右键工具栏弹出菜单和设置相关的显示格式:编辑栏,自定义图形,网格显示
//滚动条,行列标......的屏蔽,以及单元格右键菜单的屏蔽。
//工具栏上的 新建 打印预览 发送邮件 按钮无作用                                           2010-10-26
namespace NewOpen_Excel
{
    public partial class Form1 : Form
    {
       Excel.Application oApp=new Excel.Application()   ;
        //Excel.Workbooks oBooks=new  Excel.Workbooks()    ;
        //Excel.Workbook oBook =new   Workbook()  ;
        //Excel.Worksheet oSheet = new Worksheet() ;        public static Microsoft.Office.Interop.Excel.Range range = null;
        public static Microsoft.Office.Interop.Excel.Workbook wbb = null;
     
        Object refmissing = System.Reflection.Missing.Value;        public Form1()
        {
            InitializeComponent();
        }        private void button1_Click(object sender, EventArgs e)
        {
            string sFile = @"C:\Ok.xls";//工作簿所在路径
            OpenExcel(sFile);
        }         public void OpenExcel(string filePath)
        {
            if (bOpen == false)//避免重复打开的操作,对话框提示而报错!!!!!
            {
                try
                {
                    this.axWebBrowser1.Navigate(filePath);
                    object oApplication = axWebBrowser1.GetType().InvokeMember("Document", BindingFlags.GetProperty, null, axWebBrowser1, null);
                    wbb = (Microsoft.Office.Interop.Excel.Workbook)oApplication;//可获取该工作簿的相关属性,或者以本工作簿进行邮件发送
                    bOpen = true;
                }
                catch
                {                }
            }
        }         //private void axWebBrowser1_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e)
        // {
               //本过程可以省略  VS2008
        //     object[] args = new object[4];        //     args[0] = SHDocVw.OLECMDID.OLECMDID_HIDETOOLBARS;        //     args[1] = SHDocVw.OLECMDEXECOPT.OLECMDEXECOPT_DONTPROMPTUSER;        //     args[2] = refmissing;        //     args[3] = refmissing;        //     //object axWebBrowser = this.axWebBrowser1.ActiveXInstance;        //     axWebBrowser1.GetType().InvokeMember("ExecWB", BindingFlags.InvokeMethod, null, axWebBrowser1, args);        //}
         private void axWebBrowser1_NavigateComplete2(object sender, AxSHDocVw.DWebBrowserEvents2_NavigateComplete2Event e)
         {  
            //必须放在本事件中才能实现Excel的工具栏显示
             axWebBrowser1.ExecWB(SHDocVw.OLECMDID.OLECMDID_HIDETOOLBARS, SHDocVw.OLECMDEXECOPT.OLECMDEXECOPT_DONTPROMPTUSER, ref refmissing, ref refmissing);
         }         private void ExcelExit()
         {
             NAR(wbb );                                   //关闭工作簿
             oBook.Close(false, wbb.FullName, refmissing);//不做改变保存
             oApp.Quit();                                 //退出Excel进程
             NAR(oApp);                                   //销毁Excel对象 
             System.Threading.Thread.Sleep(5000);         //暂停5秒钟
         }
         private void NAR(Object o)
         {
             try
             {
                 System.Runtime.InteropServices.Marshal.ReleaseComObject(o);
             }
             catch
             {
            
             }
             finally
             {
                 o = null;
             }
         }         private void Form1_FormClosing(object sender, FormClosingEventArgs e)
         {
             ExcelExit();
         }
    }
}