[
]
[转]http://www.cnblogs.com/xiaotan68/archive/2009/03/16/1114796.html
1.直接将DataGridView显示的内容导出Excel
2.用DataGridView绑定的DataTable为参数,导出Excel
1
public void DataToExcel(DataTable m_DataTable)
2
{
3
SaveFileDialog kk = new SaveFileDialog();
4
kk.Title = "保存EXECL文件";
5
kk.Filter = "EXECL文件(*.xls) |*.xls |所有文件(*.*) |*.*";
6
kk.FilterIndex = 1;
7
if (kk.ShowDialog() == DialogResult.OK)
8
{
9
string FileName = kk.FileName + ".xls";
10
if (File.Exists(FileName))
11
File.Delete(FileName);
12
FileStream objFileStream;
13
StreamWriter objStreamWriter;
14
string strLine = "";
15
objFileStream = new FileStream(FileName, FileMode.OpenOrCreate, FileAccess.Write);
16
objStreamWriter = new StreamWriter(objFileStream, System.Text.Encoding.Unicode);
17
for (int i = 0; i < m_DataTable.Columns.Count; i++)
18
{
19
strLine = strLine + m_DataTable.Columns[i].Caption.ToString() + Convert.ToChar(9);
20
}
21
objStreamWriter.WriteLine(strLine);
22
strLine = "";
23
24
for (int i = 0; i < m_DataTable.Rows.Count; i++)
25
{
26
for (int j = 0; j < m_DataTable.Columns.Count; j++)
27
{
28
if (m_DataTable.Rows[i].ItemArray[j] == null)
29
strLine = strLine + " " + Convert.ToChar(9);
30
else
31
{
32
string rowstr = "";
33
rowstr = m_DataTable.Rows[i].ItemArray[j].ToString();
34
if (rowstr.IndexOf("\r\n") > 0)
35
rowstr = rowstr.Replace("\r\n", " ");
36
if (rowstr.IndexOf("\t") > 0)
37
rowstr = rowstr.Replace("\t", " ");
38
strLine = strLine + rowstr + Convert.ToChar(9);
39
}
40
}
41
objStreamWriter.WriteLine(strLine);
42
strLine = "";
43
}
44
objStreamWriter.Close();
45
objFileStream.Close();
46
MessageBox.Show(this, "保存EXCEL成功", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information);
47
}
48
}

浙公网安备 33010602011771号