WinForm下DataGridView导出Excel的实现
1.说明:导出的效率说不上很高,但至少是可以接收的.参考网上很多高效导出Excel的方法,实现到时能够实现的,导出速度也很快,不过缺陷在与不能很好的进行单元格的格式化,比如上图中的"拼音码"字段中的值"000000000012120",在导出后就显示"12120",挺郁闷的!o(∩_∩)o,废话不说了,进入正题.......
2.首先添加Excel引用
3.实现代码
/// <summary> /// DataGridView导出Excel /// </summary> /// <param name="strCaption">Excel文件中的标题</param> /// <param name="myDGV">DataGridView 控件</param> /// <returns>0:成功;1:DataGridView中无记录;2:Excel无法启动;9999:异常错误</returns> private int ExportExcel(string strCaption, DataGridView myDGV) { int result = 9999; // 列索引，行索引，总列数，总行数 int ColIndex = 0; int RowIndex = 0; int ColCount = myDGV.ColumnCount; int RowCount = myDGV.RowCount; if (myDGV.RowCount == 0) { result = 1; } // 创建Excel对象 Microsoft.Office.Interop.Excel.Application xlApp = new Microsoft.Office.Interop.Excel.ApplicationClass(); if (xlApp == null) { result = 2; } try { // 创建Excel工作薄 Microsoft.Office.Interop.Excel.Workbook xlBook = xlApp.Workbooks.Add(true); Microsoft.Office.Interop.Excel.Worksheet xlSheet = (Microsoft.Office.Interop.Excel.Worksheet)xlBook.Worksheets[1]; // 设置标题 Microsoft.Office.Interop.Excel.Range range = xlSheet.get_Range(xlApp.Cells[1, 1], xlApp.Cells[1, ColCount]); //标题所占的单元格数与DataGridView中的列数相同 range.MergeCells = true; xlApp.ActiveCell.FormulaR1C1 = strCaption; xlApp.ActiveCell.Font.Size = 20; xlApp.ActiveCell.Font.Bold = true; xlApp.ActiveCell.HorizontalAlignment = Microsoft.Office.Interop.Excel.Constants.xlCenter; // 创建缓存数据 object[,] objData = new object[RowCount + 1, ColCount]; //获取列标题 foreach (DataGridViewColumn col in myDGV.Columns) { objData[RowIndex, ColIndex++] = col.HeaderText; } // 获取数据 for (RowIndex = 1; RowIndex < RowCount; RowIndex++) { for (ColIndex = 0; ColIndex < ColCount; ColIndex++) { if (myDGV[ColIndex, RowIndex - 1].ValueType == typeof(string) || myDGV[ColIndex, RowIndex - 1].ValueType == typeof(DateTime))//这里就是验证DataGridView单元格中的类型,如果是string或是DataTime类型,则在放入缓存时在该内容前加入" "; { objData[RowIndex, ColIndex] = "" + myDGV[ColIndex, RowIndex - 1].Value; } else { objData[RowIndex, ColIndex] = myDGV[ColIndex, RowIndex - 1].Value; } } System.Windows.Forms.Application.DoEvents(); } // 写入Excel range = xlSheet.get_Range(xlApp.Cells[2, 1], xlApp.Cells[RowCount, ColCount]); range.Value2 = objData; //保存 xlBook.Saved = true; xlBook.SaveCopyAs("C://测试" + DateTime.Now.ToString("yyyyMMddHHmmss") + ".xls"); //返回值 result = 0; } catch (Exception err) { result = 9999; } finally { xlApp.Quit(); GC.Collect(); //强制回收 } return result; }
4.调用方法(上图中"生成Excel文件"按钮的onClick事件)
private void button4_Click(object sender, EventArgs e) { int result = this.ExportExcel("测试", this.dataGridView1); //this.dataGridView1:DataGridView控件 MessageBox.Show(result.ToString()); }
引用Microsoft.Office.Interop.Excel出现的问题
08-06-11 14:41 View:5700
操作背景:asp.net操作Excel
出现问题:在本地添加引用(com):Microsoft Office 11.0 Object Library,并写好程序调试正常,部署到服务器时,出现异常 Excel.Application不是对象.
初步诊断:服务器没有安装Excel组件
第一步尝试解决:对服务器安装Excel等Office组件,进一步测试程序:失败!
第二步尝试解决:将Excel.exe生成Interop.Excel.dll,然后用sdk引用该Dll,编译成功,测试程序:成功!
原因:本地引用的com不会在程序的bin目录生成dll文件,而程序是根据路径在寻找dll的.部署到服务器上时,假如Excel等dll与本地路径不一致,将会抛出异常,定义的Excel对象肯定是不存在的.
具体方法:
1、如何生成Interop.Excel.dll？
进入你的visual studio的sdk下的bin目录，找到TlbImp.exe文件，如果没有，请用光盘安装此文件，详细说明请参照MSDN。
命令行(cmd)进入bin目录，运行TlbImp /out:Interop.Excel.dll Office安装目录+Excel.exe
此时很可能会报错：TlbImp error: Unable to locate input type library: 'c:/program files/mcrosoft offi
ce/office/EXCEL.EXE'
此问题很有可能是TlbImp的bug，不支持空格式的路径；（具体原因不明）不要紧，将Excel.exe拷贝入bin目录，直接运行TlbImp /out:Interop.Excel.dll Excel.exe,提示“Type library imported to Interop.Excel.dll路径”
在bin目录下找到Interop.Excel.dll文件。在你的visual studio里将其引用即可。
2、如果是excel2000或excel2002怎么办？
如果是Excel2000，则将Excel.exe改成Excel9.olb
Excel2002同2003
3、各种版本的引用组件参数如下：
| 文件/版本 | Interop.Excel.dll | Interop.Office.dll | Interop.VBIDE.dll | 添加引用/COM组件 |
| 2000 | V1.3.0.0 | V2.1.0.0 | V5.3.0.0 | Microsoft Excel 9.0 Object Library(EXCEL9.OLB) |
| 2002(XP) | V1.4.0.0 | V2.2.0.0 | V5.3.0.0 | Microsoft Excel 10.0 Object Library(Excel.EXE文件) |
| 2003 | V1.5.0.0 | V2.3.0.0 | V5.3.0.0 | Microsoft Excel 11.0 Object Library(Excel.EXE文件) |