Страницы: 1
RSS
Ошибка при вставке данных макросом из Эксель в Ворд
 
Добрый день!
Написал Макрос в Эксель, сделал позднее связывание, но почему то при копировании и вставке данных в Ворд возникает ошибка: object doesn't support this property or method.

Код макроса:
Код
Worksheets("КП").Select
n = Cells(Rows.Count, 1).End(xlUp).Row
Range(Cells(1, 1), Cells(n, 7)).Copy

Dim WordObj As Object  'Объект Word.application
Dim WordDoc As Object   'Создаваемый документ

Set WordObj = CreateObject("Word.Application")
WordObj.Visible = True
Set WordDoc = WordObj.Documents.Add
Selection.PasteExcelTable False, False, False

На последней строке как раз выдает ошибку.

Помогите пожалуйста.
 
Доброе время суток.
Цитата
DopplerEffect написал:
На последней строке как раз выдает ошибку.
Ну, нельзя так сразу в понедельник, не выпив несколько чашек кофе, бросаться кодить и кодить :) В контексте кода выполняемого в Excel, Selection - к какой объектной модели принадлежит? Подумайте.

Код
WordObj.Selection.PasteExcelTable False, False, False
 
Спасибо )))
Страницы: 1
Наверх