首先從數據庫讀取數據到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進程的方式,也值得注意。