八亿电脑网
游戏盒子
当前位置: 首页 > Office之家 > Excel教程 >

Excel代码教程 模板文件填充数据另存为一个文件

时间:2015-05-15 18:11来源:网络 作者:win8e 点击:
游戏盒子

  今天我们来分享Excel模板代码的教程,看看如何打开一个Excel模板文件填充数据另存为一个文件。

  具体代码如下呈现:

  string strFileName = Environment.CurrentDirectory+@"/template/template.tpl";

  string strSaveFileName =

  Environment.CurrentDirectory+@"/Excel/"+System.DateTime.Now.ToString().Replace(":","").Replace("-","").Replace(" ","")+@".xls";

  Excel.Application ThisApplication = new Excel.ApplicationClass();

  Excel.Workbook ThisWorkBook;

  object missing = System.Reflection.Missing.Value;

  try

  {

  //加载Excel模板文件

  ThisWorkBook = ThisApplication.Workbooks.Open(strFileName,missing,missing,missing,missing,missing,

  missing,missing,missing,missing,missing,missing,missing);

  Excel.Worksheet ThisSheet = (Excel.Worksheet)ThisWorkBook.Sheets[1];

  ThisSheet.Cells[7,1] = dtEnd.ToShortDateString();

  progressBar.Value = http://www.3lian.com/edu/2015/05-15/30;

  ThisApplication.Visible = false;

  DataRow dr = dt.Rows[0];

  for( int i=0; i

  {

  ThisSheet.Cells[7,i+2] = dr[i].ToString();

  progressBar.Value +=1;

  }

  //更新数据后另存为新文件

  ThisSheet.SaveAs(strSaveFileName,missing,missing,missing,missing,missing,missing,missing,missing);

  }

  catch{}

  finally

  {

  ThisApplication.Quit();

  ThisWorkBook = null;

  ThisApplication = null;

  //dt = null;

  }

  try

  { //打开刚才生成的Excel文件

  Excel.Workbook NewWorkBook;

  NewWorkBook = NewApplication.Workbooks.Open(strSaveFileName,missing,missing,missing,missing,

  missing,missing,missing,missing,missing,missing,missing,missing);

  Excel.Worksheet NewSheet = (Excel.Worksheet)NewWorkBook.Sheets[1];

  NewApplication.Visible = true;

  //也可以使用System.Diagnostics.Process.Start(strSaveFileName);来打开新文件

发表评论
热点文章