I am using the below code in MS Word to copy a table from excel file to word file.
..................................
Private Sub Document_Open()
Set wdapp = GetObject(, "Word.Application")
Dim tbl As Excel.Range
Dim wordoc As Word.Document
Dim xlApp As Object
Dim xlWB As Object
Dim...