引自:http://bbs.gimoo.net/thread/176038-1.html
Microsoft.Office.Interop.Excel.Application excel;
Microsoft.Office.Interop.Excel._Workbook objBook;
private void btnSave_Click(object sender, EventArgs e)
{
SaveFileDialog dg = new SaveFileDialog();//保存文件对话框,选择导出文件的存放位置
dg.Filter = "xls files(*.xls)|*.xls";//保存为xls格式
if (dg.ShowDialog() == DialogResult.OK)
{
string filepath = dg.FileName.ToString();//保存文件的路径
Microsoft.Office.Interop.Excel.Workbooks objBooks;//接口 workbooks
Microsoft.Office.Interop.Excel.Sheets objSheets;// 接口 sheets
Microsoft.Office.Interop.Excel._Worksheet objSheet;//接口 worksheet
Microsoft.Office.Interop.Excel.Range range=null;
excel = new Microsoft.Office.Interop.Excel.Application();
objBooks = excel.Workbooks;
Object miss = System.Reflection.Missing.Value;
objBook = objBooks.Add(miss);
objSheets = objBook.Sheets;
objSheet = (Microsoft.Office.Interop.Excel._Worksheet)objSheets[1];
try
{
excel.Visible = false; //让后台执行设置为不可见,为true的话会看到打开一个Excel,然后数据在往里写
myrange.Cells[1, 1] = "购 货 合 同";
//自动换行,
//objSheet.Cells.WrapText = true;
//objSheet.Cells.ColumnWidth = 20;
//objSheet.Cells.Font.Size = 15;
//range.WrapText = true;
//合并单元格不成功
//range = objSheet.get_Range("A10", "A15");
//range.Merge(false);
//range.Value2 = "客户名称";
//range= (range.MergeCells);
//objSheet.get_Range("A15", "A20").Merge(objSheet.get_Range("A15", "B15").MergeCells);
//合并单元格
//objSheet.Cells.Merge(objSheet.Cells.MergeCells);
objBook.SaveCopyAs(filepath);
//设置禁止弹出保存和覆盖的询问提示框
excel.DisplayAlerts = false;
excel.AlertBeforeOverwriting = false;
//确保Excel进程关闭
objBooks.Close();
excel.Workbooks.Close();
excel.Quit();
excel = null;
GC.Collect();
MessageBox.Show("数据导出完成!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information);
if (System.IO.File.Exists(filepath))
System.Diagnostics.Process.Start(filepath); //保存成功后打开此文件
}
catch (Exception ex)
{
MessageBox.Show(ex.Message, "错误提示");
}
}