【原】将datagridview里的数据导出到excel(一)

ExpandedBlockStart.gif 哥本哈根
private   void  ExportExcel( string  fileName, DataGridView myDGV)
        {
            
string  saveFileName  =   "" ;
            
// bool fileSaved = false;
            SaveFileDialog saveDialog  =   new  SaveFileDialog();
            saveDialog.DefaultExt 
=   " xls " ;
            saveDialog.Filter 
=   " Excel文件|*.xls " ;
            saveDialog.FileName 
=  fileName;
            saveDialog.ShowDialog();
            saveFileName 
=  saveDialog.FileName;
            
if  (saveFileName.IndexOf( " : " <   0 return // 被点了取消
            Microsoft.Office.Interop.Excel.Application xlApp  =   new  Microsoft.Office.Interop.Excel.Application();
            
if  (xlApp  ==   null )
            {
                MessageBox.Show(
" 无法创建Excel对象,可能您的机子未安装Excel " );
                
return ;
            }

            Microsoft.Office.Interop.Excel.Workbooks workbooks 
=  xlApp.Workbooks;
            Microsoft.Office.Interop.Excel.Workbook workbook 
=  workbooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet);
            Microsoft.Office.Interop.Excel.Worksheet worksheet 
=  (Microsoft.Office.Interop.Excel.Worksheet)workbook.Worksheets[ 1 ]; // 取得 sheet1

            
// 写入标题
             for  ( int  i  =   0 ; i  <  myDGV.ColumnCount; i ++ )
            {
                worksheet.Cells[
1 , i  +   1 =  myDGV.Columns[i].HeaderText;
                worksheet.get_Range(worksheet.Cells[
1 1 ], worksheet.Cells[ 1 , i  +   1 ]).Font.Bold  =   true ;
            }
            
// 写入数值
             for  ( int  r  =   0 ; r  <  myDGV.Rows.Count; r ++ )
            {
                
for  ( int  i  =   0 ; i  <  myDGV.ColumnCount; i ++ )
                {
                    worksheet.Cells[r 
+   2 , i  +   1 =  myDGV.Rows[r].Cells[i].Value;
                }
                System.Windows.Forms.Application.DoEvents();
            }
            
if  (saveFileName  !=   "" )
            {
                
try
                {
                    workbook.Saved 
=   true ;
                    workbook.SaveCopyAs(saveFileName);
                }
                
catch  (Exception ex)
                {
                    MessageBox.Show(
" 导出文件时出错,文件可能正被打开!\n "   +  ex.Message);
                }

            }

            xlApp.Quit();
            GC.Collect();
// 强行销毁
            
//  if (fileSaved && System.IO.File.Exists(saveFileName)) System.Diagnostics.Process.Start(saveFileName);  // 打开EXCEL
            MessageBox.Show(fileName  +   " 保存成功 " " 提示 " , MessageBoxButtons.OK);
        }

 

转载于:https://www.cnblogs.com/gebenhagen/archive/2010/05/15/1736261.html

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值