【WinForm】杂记（3）：C#通过Excel打开和保存DataTable数据

 1 private bool DataTable2Excel(System.Data.DataSet ds, string[] sheet_names, string file_name)
 2 {
 3     Microsoft.Office.Interop.Excel.Application xlApp = new Microsoft.Office.Interop.Excel.Application();
 4     if (xlApp == null) {
 5         //MessageBox.show("There is no excel!");
 6         return false;
 7     }
 8     xlApp.Visible = true;
 9     Microsoft.Office.Interop.Excel.Workbooks xlBooks = xlApp.Workbooks;
10     Microsoft.Office.Interop.Excel.Workbook xlBook = xlBooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet);
11 
12     //add sheet
13     for (int itb = 1; itb < ds.Tables.Count; itb++) {//there has one sheet, so it should add one less sheet
14         xlBook.Sheets.Add();
15     }
16 
17     //add datatable         
18     for (int itb = 0; itb < ds.Tables.Count; itb++) {
19 
20         //convert values of datatable into an array
21         object[,] objData = new object[ds.Tables[itb].Rows.Count + 1, ds.Tables[itb].Columns.Count];//remain the first row for the col name
22         //add column name
23         for (int icol = 0; icol < ds.Tables[itb].Columns.Count; icol++) {
24             objData[0, icol] = ds.Tables[itb].Columns[icol].ColumnName;
25         }
26         //add data
27         for (int irow = 0; irow < ds.Tables[itb].Rows.Count; irow++) {
28             for (int icol = 0; icol < ds.Tables[itb].Columns.Count; icol++) {
29                 objData[irow + 1, icol] = ds.Tables[itb].Rows[irow][icol];
30             }
31         }
32 
33         //generate xlSheet
34         Microsoft.Office.Interop.Excel.Worksheet xlSheet = (Microsoft.Office.Interop.Excel.Worksheet)xlBook.Worksheets[itb + 1];
35         xlSheet.Name = sheet_names[itb];
36         try {
37             //get range and fill data
38             //1.set excel column name
39             string startCol = "A";
40             int numsOfloop = (ds.Tables[itb].Columns.Count / 26);
41             string endCol_start = (numsOfloop == 0 ? "" : ((char)(‘A‘ + (numsOfloop - 1))).ToString());
42             string endCol = endCol_start + ((char)(‘A‘ + ds.Tables[itb].Columns.Count - numsOfloop * 26 - 1)).ToString();
43             //2.generate range
44             Microsoft.Office.Interop.Excel.Range xlRange = xlSheet.get_Range(
45                 startCol + "1", endCol + (ds.Tables[itb].Rows.Count + 1).ToString()
46                 );//- iCnt * 26 
47             //3.fill the data into the range
48             xlRange.NumberFormatLocal = "@";
49             xlRange.Value = objData;
50             xlRange.EntireColumn.AutoFit(); //column rang is set as auto
51             xlSheet.get_Range(startCol + "1", endCol + (ds.Tables[itb].Rows.Count + 1)).Font.Name = "Consolas";
52         } catch {
53             this.textBox1.Text += sheet_names[itb] + "\r\n";
54         }  
55     }
56 
57     xlApp.DisplayAlerts = false;
58     xlApp.AlertBeforeOverwriting = false;
59     xlBook.SaveAs(file_name);
60     xlApp.Quit();
61 
62     return true;
63 }