国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 辦公 > Excel > 正文

Excel代碼教程 模板文件填充數據另存為一個文件

2019-10-25 21:04:31
字體:
來源:轉載
供稿:網友

   今天我們來分享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 = 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);來打開新文件


注:相關教程知識閱讀請移步到Excel教程頻道。
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 延吉市| 法库县| 汉沽区| 遂昌县| 阳西县| 黄冈市| 和顺县| 多伦县| 宝清县| 安阳县| 淳化县| 凤凰县| 北碚区| 夏津县| 兴业县| 吴川市| 建阳市| 昌江| SHOW| 仁布县| 武义县| 临城县| 博白县| 迭部县| 基隆市| 建德市| 枣庄市| 林州市| 响水县| 宁波市| 司法| 通海县| 禄丰县| 九寨沟县| 虹口区| 广平县| 嵊州市| 荣成市| 资阳市| 亚东县| 黄平县|