[skilatron]

Проблема решена.

Код:

...
FileName2:='d:\mp1.doc'; //из этого файла беру таблицу
WordApplication2.Documents.Open(FileName2,
   EmptyParam,EmptyParam,EmptyParam,
   EmptyParam,EmptyParam,EmptyParam,
   EmptyParam,EmptyParam,EmptyParam,
   EmptyParam,EmptyParam,EmptyParam,
   EmptyParam,EmptyParam,EmptyParam);
WordDocument2.ConnectTo(WordApplication2.ActiveDocument);

WordDocument2.Range.Select; //выделяю весь документ
WordDocument2.Range.Copy;  //копирую в буфер обмена

FileName1:='d:\mp.doc'; //в этот документ вставляю таблицу
WordApplication1.Documents.Open(FileName1,
   EmptyParam,EmptyParam,EmptyParam,
   EmptyParam,EmptyParam,EmptyParam,
   EmptyParam,EmptyParam,EmptyParam,
   EmptyParam,EmptyParam,EmptyParam,
   EmptyParam,EmptyParam,EmptyParam);
WordDocument1.ConnectTo(WordApplication1.ActiveDocument);

//следующие две строки помещают курсор в конец документа
WordApplication1.Selection.Start:=WordApplication1.ActiveDocument.Characters.Count;
WordApplication1.Selection.End_:=WordApplication1.ActiveDocument.Characters.Count;
WordApplication1.Selection.paste            //вставляю таблицу из буфера
WordApplication1.ActiveDocument.Save;  //сохраняю документ
...