111,129
社区成员
发帖
与我相关
我的任务
分享
Microsoft.Office.Interop.Excel.Application oexcel = new Microsoft.Office.Interop.Excel.Application();
//只要加了这一句,excel进程中就会有一个无法销毁
oexcel.Application.Workbooks.Add(true);
///////////////////////////////////////////////////////////////////////////
// DataGridView 导出到Excel ///
///////////////////////////////////////////////////////////////////////////
public static void GridToExcel(DataGridView gridView)
{
try
{
SaveFileDialog saveFileDialog = new SaveFileDialog();
saveFileDialog.Filter = "导出Excel (*.xls)|*.xls";
saveFileDialog.FilterIndex = 0;
saveFileDialog.RestoreDirectory = true;
//saveFileDialog.CreatePrompt = true;
saveFileDialog.Title = "导出Excel格式文档";
saveFileDialog.ShowDialog();
string strName = saveFileDialog.FileName;
if (strName.Length != 0)
{
//toolStripProgressBar1.Visible = true;
//以下变量什么意思?
System.Reflection.Missing miss = System.Reflection.Missing.Value;
//下面这种定义可以用
//Microsoft.Office.Interop.Excel.ApplicationClass excel = new Microsoft.Office.Interop.Excel.ApplicationClass();
//下面这样定义,导出操作同样可以成功,但据说以下为接口,不太明白
Microsoft.Office.Interop.Excel.Application oexcel = new Microsoft.Office.Interop.Excel.Application();
oexcel.Application.Workbooks.Add(true);
oexcel.Visible = true;//若是true,则在导出的时候会显示EXcel界面
if (oexcel == null)
{
MessageBox.Show("EXCEL无法启动!(可能您没有安装EXCEL,或者版本与本程序不符)","提示",MessageBoxButtons.OK,MessageBoxIcon.Information);
return;
}
Microsoft.Office.Interop.Excel.Workbooks obooks = (Microsoft.Office.Interop.Excel.Workbooks)oexcel.Workbooks;
Microsoft.Office.Interop.Excel.Workbook obook = (Microsoft.Office.Interop.Excel.Workbook)(obooks.Add(miss));
Microsoft.Office.Interop.Excel.Worksheet osheet = (Microsoft.Office.Interop.Excel.Worksheet)obook.ActiveSheet;
osheet.Name = "数据";
//创建 Range ,方便释放资源
Microsoft.Office.Interop.Excel.Range rans = (Microsoft.Office.Interop.Excel.Range)osheet.Cells;
//创建ran为了下面赋值时候使用
//Microsoft.Office.Interop.Excel.Range ran = null;
//添加表头
for (int i = 0; i < gridView.ColumnCount; i++)
{
//以下这句可用
//oexcel.Cells[1, i+1] = gridView.Columns[i].HeaderText.ToString();
//这是为单元格赋值的另一种方法
rans[1,i+1] = gridView.Columns[i].HeaderText.ToString();
}
//填充数据
for (int i = 0; i < gridView.RowCount; i++)
{
//i为行,j为列
for (int j = 0; j < gridView.ColumnCount; j++)
{
////注意:datagrid的引用方法是 datagrid1[列,行],即先列后行
if (gridView[j, i].Value.GetType() == typeof(string))
{
//oexcel.Cells[i + 2, j + 1] = "'" + gridView[j, i].Value.ToString();
rans[i + 2, j + 1] = "'" + gridView[j, i].Value.ToString();
}
else
{
//oexcel.Cells[i + 2, j + 1] = gridView[j, i].Value.ToString();
rans[i + 2, j + 1] = gridView[j, i].Value.ToString();
}
}
//toolStripProgressBar1.Value += 100 / gridView.RowCount;
}
NAR(rans);
osheet.SaveAs(strName, miss, miss, miss, miss, miss, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange, miss, miss, miss);
//book.Close(false, miss, miss);
//books.Close();
//excel.Quit();
//System.Runtime.InteropServices.Marshal.ReleaseComObject(sheet);
//System.Runtime.InteropServices.Marshal.ReleaseComObject(book);
//System.Runtime.InteropServices.Marshal.ReleaseComObject(books);
//System.Runtime.InteropServices.Marshal.ReleaseComObject(excel);
//下面销毁excel进程,为何无效呢?
obook.Close(false,miss,miss);
obooks.Close();
oexcel.Quit();
NAR(rans);
NAR(osheet);
NAR(obook);
NAR(obooks);
NAR(oexcel);
GC.Collect();
//GC.WaitForPendingFinalizers(); //不知作用是什么,有人说也须加上,可是经试不加也可以,不知为什么?
MessageBox.Show("数据已经成功导出!");
//toolStripProgressBar1.Value = 0;
System.Diagnostics.Process.Start(strName);
}
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}