让多个DataTable中的数据导入到一个excel中sheet中

一、需求

　　　　遇到这样一个需求，主管要对多个客服的工作质量审核，要求审核完成后，对应的客服的好中差评的审核结果对应到一个表格的不同sheet单元表中。

二、思路

　　　　先声明一个DataSet，把每个客服的DataTable通过DataSet的Add方法来添加进来,并且把每个表的名字命名为客服的名字（通过TableName方法实现），然后通过遍历DataSet的每个表以及每个表的行列来添加到Excel里面，在把数据保存到服务器上，然后把Exce文件下载下来，最后删除Excel文件。

三、准备

　　　　运用到一个dll，在设计导出类之前，先引入dll（我会把dll 共享一下，注意其版本，我用的是10.0），下载地址：

　　　　http://files.cnblogs.com/lzhp/microsoft.office.interop.excel%E5%90%84%E4%B8%AA%E7%89%88%E6%9C%AC.7z

　　　　，以及命名空间：　　　　　　　　　　　　　　　　　　　　　　　　

using System.IO;
using Microsoft.Office.Interop.Excel;
using System.Reflection;

四、主要代码

　　　　只要列出导出Excel的方法

#region Excel导出多个客服，不同的客服在不同的sheet里

public static void ToManySheetExcel(DataSet ds, string strExcelFileName, System.Web.UI.Page page)
{
Microsoft.Office.Interop.Excel.Application excel = new Microsoft.Office.Interop.Excel.Application();
string path = "";
if (excel == null)
{
MessageBox.Show("无法创建Excel对象，可能您的机子未安装Excel");
return;
}
try
{
excel.Visible = false;
//设置禁止弹出保存和覆盖的询问提示框
excel.DisplayAlerts = false;
excel.AlertBeforeOverwriting = true;
//增加一个工作簿
Workbook book = excel.Workbooks.Add(true);
//添加工作表         其中ds.Tables.Count.ToString()为要创建的sheet的个数
Worksheet sheets = (Microsoft.Office.Interop.Excel.Worksheet)
book.Worksheets.Add(Missing.Value, Missing.Value, Convert.ToInt32(ds.Tables.Count.ToString()), Microsoft.Office.Interop.Excel.XlSheetType.xlWorksheet);
//开始遍历ds中的各个dataTable
for (int i = 0; i < ds.Tables.Count; i++)
{
System.Data.DataTable table = ds.Tables[i];
//HttpContext.Current.Response.Write(ds.Tables[0].Rows[0][0].ToString() + "<p/>");
//获取一个工作表
Worksheet sheet = book.Worksheets[i + 1] as Worksheet;
int rowIndex = 1;
int colIndex = 0;
//为各个sheet添加列名
foreach (DataColumn col in table.Columns)
{
colIndex++;
sheet.Cells[1, colIndex] = col.ColumnName;
}
//开始添加数据
foreach (DataRow row in table.Rows)
{
rowIndex++;
colIndex = 0;
foreach (DataColumn col in table.Columns)
{
colIndex++;
//控制excel格式
String typeName = row[col.ColumnName].GetType().ToString();
sheet.Cells[rowIndex, colIndex] = typeCheckAdd(row[col.ColumnName].ToString(), typeName);
}
}
//将各个sheet的名字改为datatable.TableName
sheet.Name =ds.Tables[i].TableName.ToString();
}

//删除多余Sheet
for (int g = 1; g <= book.Worksheets.Count; g++)
{
Worksheet sheet = book.Worksheets[g] as Worksheet;
if (Convert.ToInt32(sheet.Name.Length.ToString())>5&&sheet.Name.Substring(0, 5) == "Sheet")
{
sheet.Delete();
g--;
}
}
path = page.Server.MapPath("../") + @"9_Tool/" + strExcelFileName + ".xls";

//book.Save();
book.SaveAs(path, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value,
Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
book.Close();// 注意关闭，如果不关闭，执行的时间会出现 另一个进程在使用此文件
excel.Quit();
excel = null;
GC.Collect();

//准备把文件转化成二进制文件下载下来并删除服务器上的那个Excel文件　　
FileStream fs = new FileStream(path, FileMode.Open);
byte[] bytes = new byte[(int)fs.Length];
fs.Read(bytes, 0, bytes.Length);
fs.Close();
File.Delete(path);
page.Response.ContentType = "application/octet-stream";
//通知浏览器下载文件而不是打开
page.Response.AddHeader("Content-Disposition", "attachment;  filename=" + HttpUtility.UrlEncode(DateTime.Now.ToString("yyyyMMddHHmmssffff") + "客服审评表.xls"));
page.Response.BinaryWrite(bytes);
page.Response.Flush();
page.Response.End();

}
catch (Exception e)
{
MessageBox.Show(e.Message);
}
}
#region 用来处理excel的异常显示，有必要的话可以可以添加
public static String typeCheckAdd(String cellContent, String strType)
{
String cellContentAdd;

switch (strType)
{
case "System.Int64":
cellContentAdd = "'" + cellContent;
break;
case "System.DateTime":
cellContentAdd = (Convert.ToDateTime(cellContent)).ToString("MM-dd");
break;
default:
cellContentAdd = cellContent;
break;
}
return cellContentAdd;
}

#endregion

五、总结

　　　　对于导出Excel，本方法还是比较慢的，还有下载时间，只能对于比较小的文件来使用，还有一种方法是操作Xml，具体实现方法可以先在网上搜索一下，有时间补上。

　　　　希望本文能给你带来帮助，谢谢阅读，欢迎大家指正。