Developing.ru

Есть следующий макрос.
1)Копируется в буфер некоторый диапазон заданного листа Excel
2)На основе некоторого шаблона создается WORD-ий документ , окно с этим документом становится активным.

Необходимо скопированную в 1-ом шаге информацию вставить в то место WORD-ого документа, где находится последний(он же и первый) символ абзаца. Можно, конечно, сделать это вручную с помощью команды «Вставить из буфера», но хотелось бы иметь полностью законченную процедуру переноса информации из Excela в Word.
Первые 2 пункта сделаны.
Спасибо

Может быть, станет яснее задача, если будет виден код того, что сделано (спасибо Aent за помощь написания этой части)

Sub ИзEXCEL_Word()

Dim WordObj As Object
Dim WordDoc As Object
On Error Resume Next

Range("A1:B8").Copy

Set WordObj = GetObject(, "Word.Application")
If Err.Number <> 0 Then
Err.Clear
Set WordObj = CreateObject("Word.Application")
End If

WordObj.Visible = True ' Показываем Word
Set WordDoc = WordObj.Documents.Add("С:\Шаблоны\Образец1.dot", False)
If Err.Number <> 0 Then
MsgBox "Ошибка при открытии шаблона. "
End If
WordObj.Activate ‘Активируем окно с Word-им документом

???????????????? -нужно вставить код, который помещает скопированный в первом операторе диапазон листа в первый абзац образованного Word-ого документа


Set WordDoc = Nothing
End Sub