PM> Install-Package Spire.Doc

using Spire.Doc;

namespace MergeWord
{
    class Program
    {
        static void Main(string[] args)
        {
            //Documentのインスタンスを作成する
            Document document = new Document();

            //元のWordドキュメントを読み込む
            document.LoadFromFile("C:/宇宙の視野.docx", FileFormat.Docx);

            //元のドキュメントに別のWordドキュメントを完全に挿入する
            document.InsertTextFromFile("C:/定義を超えた意味.docx", FileFormat.Docx);

            //結果ドキュメントを保存する
            document.SaveToFile("ドキュメントの結合.docx", FileFormat.Docx);
        }
    }
}

Imports Spire.Doc

Namespace MergeWord
    Class Program
        Shared Sub Main(ByVal args() As String)
            'Documentのインスタンスを作成する
            Dim document As Document = New Document()

            '元のWordドキュメントを読み込む
            document.LoadFromFile("C:/宇宙の視野.docx", FileFormat.Docx)

            '元のドキュメントに別のWordドキュメントを完全に挿入する
            document.InsertTextFromFile("C:/定義を超えた意味.docx", FileFormat.Docx)

            '結果ドキュメントを保存する
            document.SaveToFile("ドキュメントの結合.docx", FileFormat.Docx)
        End Sub
    End Class
End Namespace

using Spire.Doc;

namespace MergeWord
{
    class Program
    {
        static void Main(string[] args)
        {
            //2つのWordドキュメントを読み込む
            Document doc1 = new Document("C:/宇宙の視野.docx");
            Document doc2 = new Document("C:/定義を超えた意味.docx");

            //2番目のドキュメントをループしてすべてのセクションを取得する
            foreach (Section section in doc2.Sections)
            {

                //2番目のドキュメントのセクションをループして、その子オブジェクトを取得する
                foreach (DocumentObject obj in section.Body.ChildObjects)
                {

                    //最初のドキュメントで最後のセクションを取得する
                    Section lastSection = doc1.LastSection;

                    //すべての子オブジェクトを、最初のドキュメントで最後のセクションに追加する
                    lastSection.Body.ChildObjects.Add(obj.Clone());
                }
            }

            // 結果ドキュメントを保存する
            doc1.SaveToFile("ドキュメントの結合.docx", FileFormat.Docx);
        }
    }
}

Imports Spire.Doc

Namespace MergeWord
    Class Program
        Shared Sub Main(ByVal args() As String)
            '2つのWordドキュメントを読み込む
            Dim doc1 As Document = New Document("C:/宇宙の視野.docx")
            Dim doc2 As Document = New Document("C:/定義を超えた意味.docx")

            '2番目のドキュメントをループしてすべてのセクションを取得する
            Dim section As Section
            For Each section In doc2.Sections

                '2番目のドキュメントのセクションをループして、その子オブジェクトを取得する
                Dim obj As DocumentObject
                For Each obj 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