合并Word文档可以快速地将多份编辑好的文档合在一起，避免复制粘贴时遗漏内容，以及耗费不必要的时间，同时，也方便了人们阅读或者对其进行再次修改。例如，在我们进行团队作业的时候，每个人都会有不同的分工，此时，每个人都需要完成自己的文档，利用合并文件功能就可以快速地将所有内容集合在一起，方便了对内容的修改。本文将分为以下两部分介绍如何通过C#合并Word文档，并附上VB.NET代码供大家参考。

• 通过插入完整文件来合并文档
• 通过克隆内容合并文档

程序环境

本次测试时，在程序中引入Free Spire.Doc for .NET。可通过以下方法引用 Free Spire.Doc.dll文件：

方法1：将 Free Spire.Doc for .NET下载到本地，解压，安装。安装完成后，找到安装路径下BIN文件夹中的 Spire.Doc.dll。然后在Visual Studio中打开“解决方案资源管理器”，鼠标右键点击“引用”，“添加引用”，将本地路径BIN文件夹下的dll文件添加引用至程序。

方法2：通过NuGet安装。可通过以下2种方法安装：

（1）可以在Visual Studio中打开“解决方案资源管理器”，鼠标右键点击“引用”，“管理NuGet包”，然后搜索“Free Spire.Doc”，点击“安装”。等待程序安装完成。

（2）将以下内容复制到PM控制台安装。

Install-Package FreeSpire.Doc -Version 10.8.0

通过插入完整文件来合并文档

通过插入完整文件来合并文档的详细步骤如下：

• 创建一个Document实例。

• 使用 Document.LoadFromFile() 方法加载原始 Word 文档。

• 使用 Document.InsertTextFromFile() 方法将另一个 Word 文档完全插入到原始文档中。

• 使用 Document.SaveToFile() 方法保存结果文档。

完整代码

C#

using Spire.Doc;

namespace MergeWord
{
class Program
{
static void Main(string[] args)
{
//创建一个Document实例
Document document = new Document();

        //加载原始 Word 文档  
        document.LoadFromFile("文档1.docx", FileFormat.Docx);

        //插入另一个 Word 文档到原文档中  
        document.InsertTextFromFile("文档2.docx", FileFormat.Docx);

        //保存结果文档  
        document.SaveToFile("合并Word文档.docx", FileFormat.Docx);  
    }  
}  

}

VB.NET

Imports Spire.Doc

Namespace MergeWord
Friend Class Program
Private Shared Sub Main(ByVal args As String())
'创建一个Document实例
Dim document As Document = New Document()

        '加载原始 Word 文档  
        document.LoadFromFile("文档1.docx", FileFormat.Docx)

        '插入另一个 Word 文档到原文档中  
        document.InsertTextFromFile("文档2.docx", FileFormat.Docx)

        '保存结果文档  
        document.SaveToFile("合并Word文档.docx", FileFormat.Docx)  
    End Sub  
End Class  

End Namespace

效果图

通过克隆内容合并文档

通过克隆内容合并文档的具体步骤如下：

• 加载两个 Word 文档。

• 循环遍历第二个文档中的所有节， 然后循环遍历每个节下的子对象，获取特定的子对象，准备插入第一个文档。

• 使用 Document.LastSection 属性获取第一个文档的最后一个节，然后使用 LastSection.Body.ChildObjects.Add() 方法将子对象添加到第一个文档的最后一个节。

• 使用 Document.SaveToFile() 方法保存结果文档。

完整代码

C#

using Spire.Doc;

namespace MergeWord
{
class Program
{
static void Main(string[] args)
{
//加载两个 Word 文档
Document doc1 = new Document("文档1.docx");
Document doc2 = new Document("文档2.docx");

        //循环遍历第二个文档以获取所有节  
        foreach (Section section in doc2.Sections)  
        {

            //遍历第二个文档的各个节以获取它们的子对象  
            foreach (DocumentObject obj in section.Body.ChildObjects)  
            {

                //获取第一个文档的最后一节  
                Section lastSection = doc1.LastSection;

                //将所有子对象添加到第一个文档的最后一节  
                lastSection.Body.ChildObjects.Add(obj.Clone());  
            }  
        }

        //保存结果文档  
        doc1.SaveToFile("合并文档.docx", FileFormat.Docx);  
    }  
}  

}

VB.NET

Imports Spire.Doc

Namespace MergeWord
Friend Class Program
Private Shared Sub Main(ByVal args As String())
'加载两个 Word 文档
Dim doc1 As Document = New Document("文档1.docx")
Dim doc2 As Document = New Document("文档2.docx")

        '循环遍历第二个文档以获取所有节  
        For Each section As Section In doc2.Sections

            '遍历第二个文档的各个节以获取它们的子对象  
            For Each obj As DocumentObject In section.Body.ChildObjects

                '获取第一个文档的最后一节  
                Dim lastSection As Section = doc1.LastSection

                '将所有子对象添加到第一个文档的最后一节  
                lastSection.Body.ChildObjects.Add(obj.Clone())  
            Next  
        Next

        '保存结果文档  
        doc1.SaveToFile("合并文档.docx", FileFormat.Docx)  
    End Sub  
End Class  

End Namespace

效果图

——本文完——