Copy table

The example shows you how to copy a table from one document to another document.

C# example

using System;
using System.Collections.Generic;
using Independentsoft.Office.Word;
using Independentsoft.Office.Word.Tables;
using Independentsoft.Office.Word.Styles;

namespace Sample
{
    class Program
    {
        static void Main(string[] args)
        {
            WordDocument input = new WordDocument("c:\\test\\input.docx");
            WordDocument output = new WordDocument();

            IList<Table> tables = input.GetTables();

            if (tables.Count > 0)
            {
                output.Body.Add(tables[0]);

                if(tables[0].StyleName != null)
                {
                    Style tableStyle = null;

                    foreach(Style s in input.StyleDefinitions.Styles)
                    {
                        if (s.ID == tables[0].StyleName)
                        {
                            tableStyle = s;
                        }
                    }

                    if(tableStyle != null)
                    {
                        if(output.StyleDefinitions  == null)
                        {
                            output.StyleDefinitions = new StyleDefinitions();
                        }

                        output.StyleDefinitions.Styles.Add(tableStyle);
                    }
                }
            }

            output.Save("c:\\test\\output.docx", true);
        }
    }
}

VB example

Imports System
Imports System.Collections.Generic
Imports Independentsoft.Office.Word
Imports Independentsoft.Office.Word.Tables
Imports Independentsoft.Office.Word.Styles

Module Module1
    Sub Main(ByVal args As String())

        Dim input As New WordDocument("c:\test\input.docx")
        Dim output As New WordDocument()

        Dim tables As IList(Of Table) = input.GetTables()

        If tables.Count > 0 Then
            output.Body.Add(tables(0))

            If tables(0).StyleName IsNot Nothing Then
                Dim tableStyle As Style = Nothing

                For Each s As Style In input.StyleDefinitions.Styles
                    If s.ID = tables(0).StyleName Then
                        tableStyle = s
                    End If
                Next

                If tableStyle IsNot Nothing Then
                    If output.StyleDefinitions Is Nothing Then
                        output.StyleDefinitions = New StyleDefinitions()
                    End If

                    output.StyleDefinitions.Styles.Add(tableStyle)
                End If
            End If
        End If

        output.Save("c:\test\output.docx", True)

    End Sub
End Module

Independentsoft - any library, any programming language

Word .NET > Tutorial > Copy table

Need help? Ask our developers: