C#實現對Word文件讀寫

手頭上的一個項目報表相對比較簡單，所以報表打印採用VBA引擎，通過定製Word模版，然後根據模版需要填充數據，然後OK,打印即可。



實現方法：首先需要引用VBA組建,我用的是Office2003 Professional，Dll版本號爲Microsoft Word11.0



另外當然還需要引用Interop.Word.Dll.



代碼如下：



#region 打開Word文檔,並且返回對象wDoc,wDoc

  /// <summary>

  /// 打開Word文檔,並且返回對象wDoc,wDoc

  /// </summary>

  /// <param name="FileName">完整Word文件路徑+名稱</param>  

  /// <param name="wDoc">返回的Word.Document wDoc對象</param>

  /// <param name="WApp">返回的Word.Application對象</param>

  public static void CreateWordDocument(string FileName,ref Word.Document wDoc,ref  Word.Application WApp)

  {

   if(FileName == "") return;

   Word.Document thisDocument = null;

   Word.FormFields   formFields = null;

   Word.Application thisApplication = new Word.ApplicationClass();

   thisApplication.Visible = true;

   thisApplication.Caption = "";

   thisApplication.Options.CheckSpellingAsYouType = false;

   thisApplication.Options.CheckGrammarAsYouType = false;



   Object filename = FileName;

   Object ConfirmConversions = false;

   Object ReadOnly = true;

   Object AddToRecentFiles = false;



   Object PasswordDocument = System.Type.Missing;

   Object PasswordTemplate = System.Type.Missing;

   Object Revert = System.Type.Missing;

   Object WritePasswordDocument = System.Type.Missing;

   Object WritePasswordTemplate = System.Type.Missing;

   Object Format = System.Type.Missing;

   Object Encoding = System.Type.Missing;

   Object Visible = System.Type.Missing;

   Object OpenAndRepair = System.Type.Missing;

   Object DocumentDirection =  System.Type.Missing;

   Object NoEncodingDialog = System.Type.Missing;

   Object XMLTransform = System.Type.Missing;



   try

   {

    Word.Document wordDoc =

     thisApplication.Documents.Open(ref filename, ref ConfirmConversions,

     ref ReadOnly, ref AddToRecentFiles, ref PasswordDocument, ref PasswordTemplate,

     ref Revert,ref WritePasswordDocument, ref WritePasswordTemplate, ref Format,

     ref Encoding, ref Visible, ref OpenAndRepair, ref DocumentDirection,

     ref NoEncodingDialog, ref XMLTransform );

    

    thisDocument = wordDoc;

    wDoc = wordDoc;

    WApp = thisApplication;

    formFields = wordDoc.FormFields;

   }

   catch(Exception ex)

   {

    MessageBox.Show(ex.Message);

   }

   

  }

  #endregion



 



調用上面靜態方法，打開目標文件並且把DataGrid中數據填充到對應Word標籤中去



 



#region Word填充數據(For Example)

  /// <summary>

  /// Word填充數據

  /// </summary>

  private void WordLoadData()

  {

   Word.Document wDoc=null;

   Word.Application wApp=null;

   sysFun.CreateWordDocument("E:////監測報告(new).dot",ref wDoc,ref wApp);



   //對標籤"C"進行填充

   object bkmC="C";

   if(wApp.ActiveDocument.Bookmarks.Exists("C") == true)

   {

    wApp.ActiveDocument.Bookmarks.get_Item

     (ref bkmC).Select();

   }

   wApp.Selection.TypeText(this.txt1.Text);

   object bkmG = "TWaterTable3";

   object unit; 

   object count; //移動數

   object extend; 

    



   extend = Word.WdMovementType.wdExtend;

   unit = Word.WdUnits.wdCell;

   //把DataGrid中數據填充到標籤TWaterTable3上

   if(wApp.ActiveDocument.Bookmarks.Exists("TWaterTable3") == true)

   {

    wApp.ActiveDocument.Bookmarks.get_Item

     (ref bkmG).Select();



    for(int i=0;i<this.gridEX1.RecordCount;i++)

    {

     if(i==0)

     {

      count=1;

     }

     else

     {

      count=0;

     }

     //需填充5列數據

     wApp.Selection.Move(ref unit,ref count);

     wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[0].Text);

     count=1;

      

     wApp.Selection.Move(ref unit,ref count);

     wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[1].Text);

      

     wApp.Selection.Move(ref unit,ref count);

     wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[2].Text);

      

     wApp.Selection.Move(ref unit,ref count);

     wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[3].Text);

     

     wApp.Selection.Move(ref unit,ref count);

     wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[4].Text);

     //換行

     wApp.Selection.MoveRight(ref unit,ref count,ref extend);

    }

   }

  }

  #endregion