一、DataTable To Excel
先定义一下:
private Excel.Application excelApp= new Excel.ApplicationClass();//Application与ApplicationClass的区别我没有明白。
private Excel.Workbook excelBook = excelApp.Workbooks.Add(Type.Missing);
private Excel.Worksheet excelSheet = (Excel.Worksheet)excelBook.ActiveSheet;
excelApp.Visible = true;
1、让我们看看在网上流传最多的解决方案:可否认这段程序会不出错误的运行,但是效率就比较低了,会随着数据行和列的增加而增加,主要的时间都耗在了Excel单元格的读取上。
public void DataTableToExcel(DataTable dt) { for (int i = 0; i <dt.Rows.Count; i++) { for (int j=0;j<dt.Columns.Count;j++) { excelSheet.Cells[i+1,j+1] = dt.Rows[i][j].ToString(); } } }
让我们改进一下,利用DataRow.ItemArray:
public void DataTableToExcel(DataTable dt)
{
int colCount = dt.Columns.Count;
for (int i = 0; i <dt.Rows.Count; i++)
{
excelSheet.get_Range(excelSheet.Cells[i+1,1], excelSheet.Cells[i+1, colCount]).Value2 = dt.Rows[i].ItemArray;
}
}
这就有了很大进步,效率与数据列的多少已经无关了,对于这个改进我在网上还没有看到,为此我还曾沾沾自喜,但是这个方法的效率依然不高,尤其是灵活性不够。
以上效率的损失主要是每导出一条记录都要与Excel交互一次,如果我们把数据准备好一次性写入Excel是否效率更快?看如下程序:
public void DataTableToExcel(DataTable dt)
{
int rowCount = dt.Rows.Count;
int colCount = dt.Columns.Count;
object[,] dataArray = new object[rowCount,colCount];
for (int i = 0; i <rowCount; i++)
{
for (int j=0;j<colCount;j++)
{
dataArray[i, j] = dt.Rows[i][j];
}
}
excelSheet.get_Range("A1", excelSheet.Cells[rowCount, colCount]).Value2 = dataArray;
}
由于二维数组是在内存中实现,所以速度很快,由于是一次性写入到Excel中,使我们几乎感觉不到延迟,在Excel打开后数据马上就出来了,感觉很爽。
这一篇先写这些,下一篇中主要讨论一下字段标题的设置技巧,行列的筛选与排序等的技巧。
另有一种使用流输出文件方式,也挺快,不过不能个性化格式,要输出后,打开那个EXCEL文件来格式化。
public void CreateExcel(string FileName, DataSet ds)
{
FileStream myStream = new System.IO.FileStream(FileName,FileMode.Create);
System.IO.StreamWriter sw = new System.IO.StreamWriter(myStream, System.Text.Encoding.GetEncoding(-0));
string str = "";
try
{
//取得标题
for (int i = 0; i < ds.Tables[0].Columns.Count; i++)
{
if (i > 0)
{
str += "/t";
}
str += ds.Tables[0].Columns[i].ColumnName;
}
sw.WriteLine(str);
//取得表格中的数据
for (int j = 0; j < ds.Tables[0].Rows.Count; j++)
{
string tempStr = "";
for (int k = 0; k < ds.Tables[0].Columns.Count; k++)
{
if (k > 0)
{
tempStr += "/t";
}
if (ds.Tables[0].Rows[j][k] != DBNull.Value)
{
tempStr += ds.Tables[0].Rows[j][k].ToString();
}
}
sw.WriteLine(tempStr);
}
sw.Close();
}
catch (Exception e)
{
throw e;
}
finally
{
sw.Close();
myStream.Close();
}
}
二、给DataTableToExcel添加些智能
1、问题提出:数据导出时DataTable包含了一些不需要的数据行,需要进行进一步的筛选;导出时不能只要数据,每个字段的标题还要包括。在导出到Excel表时,有时并不是从第一行第一列开始,可能还有个“XXX明细表”、序号列之类的附加行列。
我的解决方案:1)、利用DataTable.Select(string filterExpression)方法进行筛选;
2)、先设置好DataTable每列的Caption,然后导出Caption即可。
3)、添加起始行列的索引参数。
还是看代码:
public void DataTableToExcel(DataTable dt,string sFilter,int startRow,int startCol)
{
DataRow[] drs = dt.Select(sFilter);//根据筛选条件筛选。
int rowCount = drs.Length;
int colCount = dt.Columns.Count;
object[,] dataArray = new object[rowCount+1,colCount];//二维数组定义是多一个标题行。
for (int j = 0; j <colCount; j++)
{
dataArray[0,j] = dt.Columns[j].Caption;//导出字段标题。
for (int i=0;i<rowCount;i++)
{
dataArray[i+1, j] = drs[i][j];
}
}
excelSheet.get_Range(excelSheet.Cells[startRow, startCol], excelSheet.Cells[rowCount+startRow, colCount+startCol-1]).Value2 = dataArray;
}
2、问题提出:很多人对长数字串(如身份证号码)导出到Excel表时变成科学计数法或日期型字段变成了数字烦恼,网上一般给的解决方法是在数字串前加“’”,这是一种治标不治本的方法,不仅处理上麻烦不灵活,还不具有扩展通用性。
我的解决方案:根据DataTable中字段的数据类型(dt.Columns[i].DataType)设置EXCEL中相应区域的格式。
代码:
public void DataTableToExcel(DataTable dt,string sFilter,int startRow,int startCol)
{
DataRow[] drs = dt.Select(sFilter);//根据筛选条件筛选。
int rowCount = drs.Length;
int colCount = dt.Columns.Count;
object[,] dataArray = new object[rowCount+1,colCount];//二维数组定义是多一个标题行。
for (int j = 0; j <colCount; j++)
{
dataArray[0,j] = dt.Columns[j].Caption;//导出字段标题。
//根据各列的数据类型设置Excel的格式。
switch(dt.Columns[i].DataType.ToString())
{
case “System.String”: excelSheet.get_Range(excelSheet.Cells[startRow, startCol+j], excelSheet.Cells[rowCount+startRow, startCol+j]).NumberFormatLocal = “@”;break;
case “System.DateTime”: excelSheet.get_Range(excelSheet.Cells[startRow, startCol+j], excelSheet.Cells[rowCount+startRow, startCol+j]).NumberFormatLocal = “yyyy-mm-dd”;break;
//可以根据自己的需要扩展。
default: excelSheet.get_Range(excelSheet.Cells[startRow, startCol+j], excelSheet.Cells[rowCount+startRow, startCol+j]).NumberFormatLocal = “G/通用格式”;break;
}
for (int i=0;i<rowCount;i++)
{
dataArray[i+1, j] = drs[i][j];
}
}
excelSheet.get_Range(excelSheet.Cells[startRow, startCol], excelSheet.Cells[rowCount+startRow, colCount+startCol-1]).Value2 = dataArray;
}
3、问题提出:DataTable中有些列不需要导出(如自增列),有些列的前后顺序根据要求可能也不相同,怎么办?
我的解决方案:加入一个int[]数组(如new int[]{5,2,6,4,3,8},数组中元素表示DataTable中第几列),根据数组中列的序号和位置进行筛选和排序。
让我们扩展上面的代码:
public void DataTableToExcel(DataTable dt,string sFilter,int startRow,int startCol,int[] columns)
{
DataRow[] drs = dt.Select(sFilter);//根据筛选条件筛选。
int rowCount = drs.Length;
int colCount = columns. Length;
object[,] dataArray = new object[rowCount+1,colCount];//二维数组定义是多一个标题行。
for (int j = 0; j <colCount; j++)
{
dataArray[0,j] = dt.Columns[columns[j]].Caption;//导出字段标题。
//根据各列的数据类型设置Excel的格式。
switch(dt.Columns[columns[j]].DataType.ToString())
{
case “System.String”: excelSheet.get_Range(excelSheet.Cells[startRow, startCol+j], excelSheet.Cells[rowCount+startRow, startCol+j]).NumberFormatLocal = “@”;break;
case “System.DateTime”: excelSheet.get_Range(excelSheet.Cells[startRow, startCol+j], excelSheet.Cells[rowCount+startRow, startCol+j]).NumberFormatLocal = “yyyy-mm-dd”;break;
//可以根据自己的需要扩展。
default: excelSheet.get_Range(excelSheet.Cells[startRow, startCol+j], excelSheet.Cells[rowCount+startRow, startCol+j]).NumberFormatLocal = “G/通用格式”;break;
}
for (int i=0;i<rowCount;i++)
{
dataArray[i+1, j] = drs[i][columns[j]];
}
}
excelSheet.get_Range(excelSheet.Cells[startRow, startCol], excelSheet.Cells[rowCount+startRow, colCount+startCol-1]).Value2 = dataArray;
}
写道这儿,DataTableToExcel也算是基本满足要求了,一些个性化的功能可以根据自己的需要增加,比如,可以返回导入到Excel最后一行的行号,方便接着导入下一个表;由于Excel有行数限制或者某些要求一个sheet不能超过多少行,这时可以采用多个sheet分页的方式导入,这是更加深入的话题了。
以上功能的实现,都是因为工作中实际需要产生的,不是每个人都需要的,可以根据情况进行重构。
有一个网络上封装好的类。完整源码+Demo在这里:http://download.csdn.net/source/2828645 备用的
参考资料:
Office 编程中的常见任务:http://msdn.microsoft.com/zh-cn/library/htx7t4k0(v=VS.80).aspx
使用 Office 对象模型实现应用程序自动化: http://msdn.microsoft.com/zh-cn/library/y1xatbkd(VS.80).aspx
更多:
C# Excel行高、列宽、合并单元格、单元格边框线、冻结
private _Workbook _workBook = null;
private Worksheet _workSheet = null;
private Excel.Application _excelApplicatin = null;
_excelApplicatin = new Excel.Application();
_excelApplicatin.Visible = true;
_excelApplicatin.DisplayAlerts = true;
_workBook = _excelApplicatin.Workbooks.Add(XlSheetType.xlWorksheet);
_workSheet = (Worksheet)_workBook.ActiveSheet;
_workSheet.Name = "workSheetName";
//RowHeight "1:1"表示第一行, "1:2"表示,第一行和第二行
((Excel.Range)_workSheet.Rows["1:1", System.Type.Missing]).RowHeight = 100;
//ColumnWidth "A:B"表示第一列和第二列, "A:A"表示第一列
((Excel.Range)_workSheet.Columns["A:B", System.Type.Missing]).ColumnWidth = 10;
// EXCEL操作(需要冻结的字段 按住ALT+W 再按F)
Excel.Range excelRange = _workSheet .get_Range(_workSheet .Cells[10, 5], _workSheet .Cells[10, 5]);
excelRange.Select();
excelApplication.ActiveWindow.FreezePanes = true;
//Borders.LineStyle 单元格边框线
Excel.Range excelRange = _workSheet.get_Range(_workSheet.Cells[2, 2], _workSheet.Cells[4, 6]);
//单元格边框线类型(线型,虚线型)
excelRange.Borders.LineStyle = 1;
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeTop).LineStyle = Excel.XlLineStyle.xlContinuous;
//指定单元格下边框线粗细,和色彩
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeBottom).Weight = Excel.XlBorderWeight.xlMedium;
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeBottom).ColorIndex =3;
//设置字体大小
excelRange.Font.Size = 15;
//设置字体是否有下划线
excelRange.Font.Underline = true;
//设置字体在单元格内的对其方式
excelRange.HorizontalAlignment = XlHAlign.xlHAlignCenter;
//设置单元格的宽度
excelRange.ColumnWidth = 15;
//设置单元格的背景色
excelRange.Cells.Interior.Color = System.Drawing.Color.FromArgb(255, 204, 153).ToArgb();
// 给单元格加边框
excelRange.BorderAround(XlLineStyle.xlContinuous, XlBorderWeight.xlThick,
XlColorIndex.xlColorIndexAutomatic, System.Drawing.Color.Black.ToArgb());
//自动调整列宽
excelRange.EntireColumn.AutoFit();
// 文本水平居中方式
excelRange.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter;
//文本自动换行
excelRange.WrapText = true;
//填充颜色为淡紫色
excelRange.Interior.ColorIndex = 39;
//合并单元格
excelRange.Merge(excelRange.MergeCells);
_workSheet.get_Range("A15", "B15").Merge(_workSheet.get_Range("A15", "B15").MergeCells);