從DataTable高效率導出數據到Excel


首先從數據庫讀取數據到DataTable,這我就不提了,大家都明白。下面直接介紹如何從DataTable高效率導出數據到Excel中的方法,代碼如下:

using Microsoft.Office.Interop.Excel;
using System.Runtime.InteropServices;

[DllImport("User32.dll", CharSet = CharSet.Auto)]
public static extern int GetWindowThreadProcessId(IntPtr hwnd, out int pid);
//函數原型;DWORD GetWindowThreadProcessld(HWND hwnd,LPDWORD lpdwProcessld);
//參數:hWnd:窗口句柄
//參數:lpdwProcessld:接收進程標識的32位值的地址。如果這個參數不為NULL,GetWindwThreadProcessld將進程標識拷貝到這個32位值中,否則不拷貝
//返回值:返回值為創建窗口的線程標識。

//dt:從數據庫讀取的數據;file_name:保存路徑;sheet_name:表單名稱
private void DataTableToExcel(DataTable dt, string file_name, string sheet_name)
{
       Microsoft.Office.Interop.Excel.Application Myxls = new  Microsoft.Office.Interop.Excel.Application();
       Microsoft.Office.Interop.Excel.Workbook Mywkb = Myxls.Workbooks.Add();
       Microsoft.Office.Interop.Excel.Worksheet MySht = Mywkb.ActiveSheet;
       MySht.Name = sheet_name;
       Myxls.Visible = false;
       Myxls.DisplayAlerts = false;
       try
       {
              //寫入表頭
              object[] arrHeader = new object[dt.Columns.Count];
              for(int i = 0; i < dt.Columns.Count; i++)
              {
                     arrHeader[i] = dt.Columns[i].ColumnName;
              }
              MySht.Range[Mysht.Cells[1,1], MySht.Cells[1,dt.Columns.Count]].Value2 = arrHeader;
              //寫入表體數據
              object[,] arrBody = new object[dt.Rows.Count, dt.Columns.Count];
              for(int i = 0; i < dt.Rows.Count; i++)
              {
                      for(int j = 0; j < dt.Columns.Count; j++)
                      {
                              arrBody[i,j] = dt.Rows[i][j].ToString();
                      }
              }
              MySht.Range[MySht.Cells[2,1], MySht.Cells[dt.Rows.Count + 1, dt.Columns.Count]].Value2 = arrBody;
              if(Mywkb != null)
              {
                      Mywkb.SaveAs(file_name);
                      Mywkb.Close(Type.Missing, Type.Missing, Type.Missing);
                      Mywkb = null;
              }
       }
       catch(Exception ex)
       {
               MessageBox.Show(ex.Message, "系統提示");
       }
       finally
       {
                //徹底關閉Excel進程
                if(Myxls != null)
                {
                       Myxls.Quit();
                       try
                       {
                              if(Myxls != null)
                              {
                                    int pid;
                                    GetWindowThreadProcessId(new IntPtr(Myxls.Hwnd), out pid);
                                    System.Diagnostics.Process p = System.Diagnostics.Process.GetProcessById(pid);
                                     p.Kill();
                              }
                       }
                       catch(Exception ex)
                       {
                              MessageBox.Show("結束當前EXCEL進程失敗:" + ex.Message);
                       }
                       Myxls = null;
                }
                GC.Collect();
       }
}

說明:

1)上述方法中,將DataTable單元格內容寫入數組后一次性賦值給Excel的Range,效率非常高,比之循環DataTable單元格逐個賦值給Excel的Cell的方法,速度快多了;

2)上述方法中用到的徹底關閉Excel進程的方式,也值得注意。


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM