Скопировать таблицу из Excel в файл Word - VBA

Узнай цену своей работы

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

Не нашел решения в Инете, может тут кто-то подскажет дельное. Есть документ Word, а конкретнее приказ, в котором необходимо вставить таблицу из Excel. Все что нашел связано с созданием нового файла Word, либо запись с 1-й строки с удалением информации. Шаблон также не устраивает. Пытался указать закладку после которой скопировалась бы таблица, но тогда дает ошибку 424. Пытаюсь делать что-то такое:

Решение задачи: «Скопировать таблицу из Excel в файл Word»

textual
Листинг программы
Private Sub Test()
    Range("A1:D300").Copy
 
    With GetObject("I:\Deloproizvodstvo\Prikaz.docx")
         .Bookmarks("ImportExcel").Range.Paste
         '.Bookmarks("ImportExcel").Range.PasteExcelTable False, False, True
         .Parent.Visible = True
    End With
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 4 из 5