C#/VB.NET : fusionner des documents Word

PM> Install-Package Spire.Doc

using Spire.Doc;
    
    namespace MergeWord
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Create a Document instance
                Document document = new Document();
    
                //Load the original Word document
                document.LoadFromFile("Doc1.docx", FileFormat.Docx);
    
                //Insert another Word document entirely to the original document
                document.InsertTextFromFile("Doc2.docx", FileFormat.Docx);
    
                //Save the result document
                document.SaveToFile("MergedWord.docx", FileFormat.Docx);
            }
        }
    }

Imports Spire.Doc
    
    Namespace MergeWord
        Class Program
            Private Shared Sub Main(ByVal args() As String)
                'Create a Document instance
                Dim document As Document = New Document
    
                'Load the original Word document
                document.LoadFromFile("Doc1.docx", FileFormat.Docx)
    
                'Insert another Word document entirely to the original document
                document.InsertTextFromFile("Doc2.docx", FileFormat.Docx)
    
                'Save the result document
                document.SaveToFile("MergedWord.docx", FileFormat.Docx)
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    
    namespace MergeWord
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Load two Word documents
                Document doc1 = new Document("Doc1.docx");
                Document doc2 = new Document("Doc2.docx");
    
                //Loop through the second document to get all the sections
                foreach (Section section in doc2.Sections)
                {
    
                    //Loop through the sections of the second document to get their child objects
                    foreach (DocumentObject obj in section.Body.ChildObjects)
                    {
    
                        // Get the last section of the first document
                         Section lastSection = doc1.LastSection;
    
                        //Add all child objects to the last section of the first document
                        lastSection.Body.ChildObjects.Add(obj.Clone());
                    }
                }
    
                // Save the result document
                doc1.SaveToFile("MergeDocuments.docx", FileFormat.Docx);
            }
        }
    } 

Imports Spire.Doc
    
    Namespace MergeWord
        Class Program
            Private Shared Sub Main(ByVal args() As String)
                'Load two Word documents
                Dim doc1 As Document = New Document("Doc1.docx")
                Dim doc2 As Document = New Document("Doc2.docx")
    
                'Loop through the second document to get all the sections
                For Each section As Section In doc2.Sections
    
                    'Loop through the sections of the second document to get their child objects
                    For Each obj As DocumentObject In section.Body.ChildObjects
    
                        ' Get the last section of the first document
                        Dim lastSection As Section = doc1.LastSection
    
                        'Add all child objects to the last section of the first document
                        lastSection.Body.ChildObjects.Add(obj.Clone)
                    Next
                Next
    
                ' Save the result document
                doc1.SaveToFile("MergeDocuments.docx", FileFormat.Docx)
            End Sub
        End Class
    End Namespace