WinForm利用Microsoft.Office.Interop.Word來合併多個Word檔

最新推荐文章于 2025-01-18 20:23:30 发布

云烟，不再年轻

最新推荐文章于 2025-01-18 20:23:30 发布

阅读量2.2k

点赞数

分类专栏： Office 文章标签： winform kill c# c

Office 专栏收录该内容

10 篇文章

订阅专栏

最近同事問到這個問題,小弟一樣去找解答,分享一下測試心得

首先準備好兩個測試的word檔(1.doc,2.doc)放在c槽裡,執行完程式就產生3.doc的合併檔了

WinForm(C#)
WordCombine.cs

 
   01using System;
 
   02using System.Collections.Generic;
 
   03using System.ComponentModel;
 
   04using System.Data;
 
   05using System.Drawing;
 
   06using System.Text;
 
   07using System.Windows.Forms;
 
   08using Word = Microsoft.Office.Interop.Word;//這個要先加入Microsoft.Office.Interop.Word參考
 
   09using System.Reflection;//這個記得參考
 
   10 
 
   11namespace WindowsApplication1
 
   12{
 
   13    public partial class WordCombine : Form
 
   14    {
 
   15        public WordCombine()
 
   16        {
 
   17            InitializeComponent();
 
   18        }
 
   19 
 
   20        private void WordCombine_Load(object sender, EventArgs e)
 
   21        {
 
   22            object missing = Missing.Value;
 
   23            string oFirstDoc = @"c:/1.doc";//word檔1
 
   24            object oSecondDoc = @"c:/2.doc";//word檔2
 
   25            object oOutputDoc = @"c:/3.doc";//合併檔
 
   26 
 
   27            //object oPageBreak = Word.WdBreakType.wdLineBreak;//接下行合併(LineBreak)
 
   28            object oPageBreak = Word.WdBreakType.wdPageBreak;//接下頁合併(PageBreak)
 
   29 
 
   30            Word.Application wordApp = new Word.Application();
 
   31            Word.Document origDoc = wordApp.Documents.Open(ref oSecondDoc, ref missing, ref missing, ref missing, refmissing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, refmissing, ref missing, ref missing);
 
   32            origDoc.Activate();
 
   33            wordApp.Selection.InsertFile(oFirstDoc, ref missing, ref missing, ref missing, ref missing);
 
   34            wordApp.Selection.InsertBreak(ref oPageBreak);
 
   35            wordApp.ActiveDocument.SaveAs(ref oOutputDoc, ref missing, ref missing, ref missing, ref missing, refmissing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, refmissing, ref missing);
 
   36            wordApp.ActiveDocument.Close(ref missing, ref missing, ref missing);
 
   37            wordApp.Quit(ref missing, ref missing, ref missing);//加這行可以 Kill WINWORD.EXE process
 
   38        }
 
   39    }
 
   40}