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

來源:互聯網
上載者:User

轉自http://benben.javaeye.com/blog/279474

 

網上比較多講述如何操作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();

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.