字符串To Excel

  public   void  ExportToExcel( string  fPath,  string  strBuffer) 
        

            
string filePath="c:/"+fPath+".xls";
            
object oMissing = System.Reflection.Missing.Value; 
            Excel.ApplicationClass xlApp 
= new Excel.ApplicationClass(); 
            
try 
            

                
//新建一个excel表
                Excel.Application exc =new Excel.ApplicationClass();
                exc.Application.Workbooks.Add ( 
true ) ;
                exc.ActiveWorkbook.SaveAs(filePath, 
                    Excel.XlFileFormat.xlWorkbookNormal, Type.Missing, 
                    Type.Missing, Type.Missing, Type.Missing, 
                    Excel.XlSaveAsAccessMode.xlNoChange, Type.Missing, 
                    Type.Missing, Type.Missing, Type.Missing, Type.Missing); 
                exc.Quit();
                System.Runtime.InteropServices.Marshal.ReleaseComObject(exc); 
                exc 
= null

                
// 打开Excel文件。以下为Office 2000. 
                Excel.Workbook xlWorkbook = xlApp.Workbooks.Open(filePath, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing); 
                Excel.Worksheet xlWorksheet; 
                
// 添加入一个新的Sheet页。 
                xlWorksheet = (Excel.Worksheet)xlWorkbook.Worksheets.Add(oMissing,oMissing,1,oMissing); 
                
// 作为新加的Sheet页名。 
                xlWorksheet.Name = fPath; 
                
// 利用系统剪切板 
                System.Windows.Forms.Clipboard.SetDataObject(""); 
                
// 将stringBuffer放入剪切板。 
                System.Windows.Forms.Clipboard.SetDataObject(strBuffer); 
                
// 选中这个sheet页中的第一个单元格 
                ((Excel.Range)xlWorksheet.Cells[1,1]).Select(); 
                
// 粘贴! 
                xlWorksheet.Paste(oMissing,oMissing); 
                
// 清空系统剪切板。 
                System.Windows.Forms.Clipboard.SetDataObject(""); 
                
// 保存并关闭这个工作簿。 
                xlWorkbook.Close( Excel.XlSaveAction.xlSaveChanges, oMissing, oMissing );   
                System.Runtime.InteropServices.Marshal.ReleaseComObject(xlWorkbook); 
                xlWorkbook 
= null
            }
 
            
catch(Exception ex) 
            

                MessageBox.Show(ex.Message); 
            }
 
            
finally 
            

                
// 释放... 
                xlApp.Quit(); 
                System.Runtime.InteropServices.Marshal.ReleaseComObject(xlApp); 
                xlApp 
= null
                GC.Collect(); 
            }
 
        }
 

 

string strBuffer="服务站/t月租(30)/t月租(50)/t月租(60)/t月租(100)/t月租(折扣)/t免费/t/n"+insValue;

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值