快捷導(dǎo)航

利用C#實(shí)現(xiàn)合并Word文檔功能

更新時(shí)間：2022年12月08日 16:09:14 作者：Carina-baby

合并Word文檔可以快速地將多份編輯好的文檔合在一起，避免復(fù)制粘貼時(shí)遺漏內(nèi)容，以及耗費(fèi)不必要的時(shí)間。本文將分為以下兩部分介紹如何通過C#合并Word文檔，并附上VB.NET代碼供大家參考，希望對(duì)大家有所幫助

合并Word文檔可以快速地將多份編輯好的文檔合在一起，避免復(fù)制粘貼時(shí)遺漏內(nèi)容，以及耗費(fèi)不必要的時(shí)間，同時(shí)，也方便了人們閱讀或者對(duì)其進(jìn)行再次修改。例如，在我們進(jìn)行團(tuán)隊(duì)作業(yè)的時(shí)候，每個(gè)人都會(huì)有不同的分工，此時(shí)，每個(gè)人都需要完成自己的文檔，利用合并文件功能就可以快速地將所有內(nèi)容集合在一起，方便了對(duì)內(nèi)容的修改。本文將分為以下兩部分介紹如何通過C#合并Word文檔，并附上VB.NET代碼供大家參考。

通過插入完整文件來合并文檔
通過克隆內(nèi)容合并文檔

程序環(huán)境

本次測(cè)試時(shí)，在程序中引入Free Spire.Doc for .NET?？赏ㄟ^以下方法引用 Free Spire.Doc.dll文件：

方法1：將 Free Spire.Doc for .NET下載到本地，解壓，安裝。安裝完成后，找到安裝路徑下BIN文件夾中的 Spire.Doc.dll。然后在Visual Studio中打開“解決方案資源管理器”，鼠標(biāo)右鍵點(diǎn)擊“引用”，“添加引用”，將本地路徑BIN文件夾下的dll文件添加引用至程序。

方法2：通過NuGet安裝?？赏ㄟ^以下2種方法安裝：

（1）可以在Visual Studio中打開“解決方案資源管理器”，鼠標(biāo)右鍵點(diǎn)擊“引用”，“管理NuGet包”，然后搜索“Free Spire.Doc”，點(diǎn)擊“安裝”。等待程序安裝完成。

（2）將以下內(nèi)容復(fù)制到PM控制臺(tái)安裝。

Install-Package FreeSpire.Doc -Version 10.8.0

通過插入完整文件來合并文檔

通過插入完整文件來合并文檔的詳細(xì)步驟如下：

創(chuàng)建一個(gè)Document實(shí)例。
使用 Document.LoadFromFile() 方法加載原始 Word 文檔。
使用 Document.InsertTextFromFile() 方法將另一個(gè) Word 文檔完全插入到原始文檔中。
使用 Document.SaveToFile() 方法保存結(jié)果文檔。

完整代碼

C#

using Spire.Doc;

namespace MergeWord
{
    class Program
    {
        static void Main(string[] args)
        {
            //創(chuàng)建一個(gè)Document實(shí)例
            Document document = new Document();

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

            //插入另一個(gè) Word 文檔到原文檔中
            document.InsertTextFromFile("文檔2.docx", FileFormat.Docx);

            //保存結(jié)果文檔
            document.SaveToFile("合并Word文檔.docx", FileFormat.Docx);
        }
    }
}

VB.NET

Imports Spire.Doc

Namespace MergeWord
    Friend Class Program
        Private Shared Sub Main(ByVal args As String())
            '創(chuàng)建一個(gè)Document實(shí)例
            Dim document As Document = New Document()

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

            '插入另一個(gè) Word 文檔到原文檔中
            document.InsertTextFromFile("文檔2.docx", FileFormat.Docx)

            '保存結(jié)果文檔
            document.SaveToFile("合并Word文檔.docx", FileFormat.Docx)
        End Sub
    End Class
End Namespace

效果圖

通過克隆內(nèi)容合并文檔

通過克隆內(nèi)容合并文檔的具體步驟如下：

加載兩個(gè) Word 文檔。
循環(huán)遍歷第二個(gè)文檔中的所有節(jié)，然后循環(huán)遍歷每個(gè)節(jié)下的子對(duì)象，獲取特定的子對(duì)象，準(zhǔn)備插入第一個(gè)文檔。
使用 Document.LastSection 屬性獲取第一個(gè)文檔的最后一個(gè)節(jié)，然后使用 LastSection.Body.ChildObjects.Add() 方法將子對(duì)象添加到第一個(gè)文檔的最后一個(gè)節(jié)。
使用 Document.SaveToFile() 方法保存結(jié)果文檔。

完整代碼

C#

using Spire.Doc;

namespace MergeWord
{
    class Program
    {
        static void Main(string[] args)
        {
            //加載兩個(gè) Word 文檔
            Document doc1 = new Document("文檔1.docx");
            Document doc2 = new Document("文檔2.docx");

            //循環(huán)遍歷第二個(gè)文檔以獲取所有節(jié)
            foreach (Section section in doc2.Sections)
            {

                //遍歷第二個(gè)文檔的各個(gè)節(jié)以獲取它們的子對(duì)象
                foreach (DocumentObject obj in section.Body.ChildObjects)
                {

                    //獲取第一個(gè)文檔的最后一節(jié)
                    Section lastSection = doc1.LastSection;

                    //將所有子對(duì)象添加到第一個(gè)文檔的最后一節(jié)
                    lastSection.Body.ChildObjects.Add(obj.Clone());
                }
            }

            //保存結(jié)果文檔
            doc1.SaveToFile("合并文檔.docx", FileFormat.Docx);
        }
    }
}

VB.NET

Imports Spire.Doc

Namespace MergeWord
    Friend Class Program
        Private Shared Sub Main(ByVal args As String())
            '加載兩個(gè) Word 文檔
            Dim doc1 As Document = New Document("文檔1.docx")
            Dim doc2 As Document = New Document("文檔2.docx")

            '循環(huán)遍歷第二個(gè)文檔以獲取所有節(jié)
            For Each section As Section In doc2.Sections

                '遍歷第二個(gè)文檔的各個(gè)節(jié)以獲取它們的子對(duì)象
                For Each obj As DocumentObject In section.Body.ChildObjects

                    '獲取第一個(gè)文檔的最后一節(jié)
                    Dim lastSection As Section = doc1.LastSection

                    '將所有子對(duì)象添加到第一個(gè)文檔的最后一節(jié)
                    lastSection.Body.ChildObjects.Add(obj.Clone())
                Next
            Next

            '保存結(jié)果文檔
            doc1.SaveToFile("合并文檔.docx", FileFormat.Docx)
        End Sub
    End Class
End Namespace