... сможет выделить текст до переноса строки, записать его в ячейку Excel и т.д. в цикле каждую новую строку. Такое вообще реально сделать? Вот код для подключения ... ...     objWrdApp.Visible = False         Set objWrdDoc = objWrdApp.Documents.Open(avFiles)         Set tbl = objWrdDoc.Tables(1)         ActiveSheet.Cells(1, 1) = tbl.Cell(2, 1).Range.text                objWrdDoc.Close True       ...