BlogJava-tambc-文章分类-C#http://www.blogjava.net/tambc/category/18609.htmlzh-cnWed, 28 Feb 2007 03:40:55 GMTWed, 28 Feb 2007 03:40:55 GMT60C#如何在Form中嵌入并且操作Excel表格http://www.blogjava.net/tambc/articles/89235.htmltambctambcThu, 21 Dec 2006 03:34:00 GMThttp://www.blogjava.net/tambc/articles/89235.htmlhttp://www.blogjava.net/tambc/comments/89235.htmlhttp://www.blogjava.net/tambc/articles/89235.html#Feedback0http://www.blogjava.net/tambc/comments/commentRss/89235.htmlhttp://www.blogjava.net/tambc/services/trackbacks/89235.html 在网上收集来的，忘记从哪里得来的了

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

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

  先要添加对Excel的引用。选择项目-〉添加引用-〉COM-〉添加Microsoft Excel 9.0。（不同的office讲会有不同版本的dll文件）。 
  
 1using Excel; 
 2   using System.Reflection; 
 3   
 4   //产生一个Excel.Application的新进程 
 5   Excel.Application app = new Excel.Application(); 
 6   if (app == null) 
 7   { 
 8    statusBar1.Text = "ERROR: EXCEL couldn’t be started!"; 
 9    return ; 
10   } 
11   
12   app.Visible = true; //如果只想用程序控制该excel而不想让用户操作时候，可以设置为false 
13   app.UserControl = true; 
14   
15   Workbooks workbooks =app.Workbooks; 
16   
17   _Workbook workbook = workbooks.Add(XlWBATemplate.xlWBATWorksheet); //根据模板产生新的workbook 
18//  _Workbook workbook = workbooks.Add("c:\\a.xls"); //或者根据绝对路径打开工作簿文件a.xls 
19
20   Sheets sheets = workbook.Worksheets; 
21   _Worksheet worksheet = (_Worksheet) sheets.get_Item(1); 
22   if (worksheet == null) 
23   { 
24    statusBar1.Text =  "ERROR: worksheet == null"; 
25    return; 
26   } 
27
28   // This paragraph puts the value 5 to the cell G1 
29   Range range1 = worksheet.get_Range("A1", Missing.value); 
30   if (range1 == null) 
31   { 
32    statusBar1.Text =  "ERROR: range == null"; 
33    return; 
34   } 
35   const int nCells = 2345; 
36   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();

tambc 2006-12-21 11:34 发表评论
]]>