Заполнение таблицы в шаблоне Word - Visual Basic .NET

Формулировка задачи:

Доброго времени суток господа. Вопрос возможно для знатоков прост... Создаю документ Word, в котором пара таблиц. прописать тексты в нужных ячейках, форматы и т.п. не вопрос. Есть 2-ва затыка. 1-вый в первой ячейке в прописывается текст, нужно вставить в определенное место в тексте .jpg - мой код:

        oTable = oDoc.Tables.Add(oDoc.Bookmarks.Item("\endofdoc").Range, 3, 5, DefaultTableBehavior:=Microsoft.Office.Interop.Word.WdDefaultTableBehavior.wdWord9TableBehavior, AutoFitBehavior:=
        Microsoft.Office.Interop.Word.WdAutoFitBehavior.wdAutoFitFixed)
        oTable.Range.ParagraphFormat.SpaceAfter = 6
        With oTable.Rows.Item(1)
            .Cells.Merge()                          'Обьеденяю ячейки первой строки.
            .Range.Style = "Сильное выделение"      'Стиль в ячейке.       
            .Range.Font.Size = 13                   'Размер шрифта.  
            .Range.Text = "Справка – wwwwwwwwwwwwwwwwwwwwww ''Foto'' за " & Format(Now, "dd.MM.yy")    'Текст в ячейке 1.
            .Range.Select()
            oWord.Selection.Start = 158 ': 
            'oWord.Selection.End = 168
            'oWord.Selection.MoveRight(Unit:=WdUnits.wdCharacter, Count:=79)
        End With
        'oTable.Cell(1, 1).Select()
        'oTable.Cell(1, 1)
        ' Range:=oWord.Selection.Range,
        oTable.Rows.Item(1).Range.InlineShapes.AddPicture(FileName:="D:\foto\BackgroundImage\Foto.jpg", Range:=oWord.Selection.Range, LinkToFile:=False, SaveWithDocument:=True)
        oTable.Rows.Item(1).Range.ParagraphFormat.SpaceAfter = 1    'Интервал междустрочный.

2-ой затык - внедрить объект Excel, а именно таблицу шаблон. Прошу подсказать в каком направлении двигаться. Спасибо.

Решение задачи: «Заполнение таблицы в шаблоне Word»

textual
                            Листинг программы 
                        

                            oTable.Rows.Item(1).Cells(1).Range.InlineShapes.AddPicture(FileName:= _
        "c:/path/to/picture.jpg", LinkToFile:=False, _
        SaveWithDocument:=True)
                        