Перенос таблицы из Word в Excel - VBA

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

Доброго дня. появилась такая проблемка: есть электронная заявка(таблица в Excel) и есть вордовский документ который мы получаем от клиента.в вордовском документе таблица с такими же столбцами как и в электронной заявке. так вот в чем проблема, как мне привязаться из экселя к ворду? что бы можно было перенести данные из ворда в эксель. использовать ctrl+с и ctrl+v не рекомендуется, т.к. хотел бы сделать перенос через кнопку на форме. вордовский файлик всегда будет лежать в одном месте.

Решение задачи: «Перенос таблицы из Word в Excel»

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

                                With Application.FileDialog(msoFileDialogFilePicker)
        .AllowMultiSelect = False
        .InitialFileName = "C:\"
        .ButtonName = "OK"
        .Filters.Clear
        .Filters.Add Description:="Файлы Word", _
            Extensions:="*.doc*"
        If .Show = 0 Then
            Exit Sub
        End If
        DocFullName = .SelectedItems(1)
        .Filters.Clear
    End With
                        