is it possible to transfer data from excel into an existing word document

[johan4b]

Hi guys

I have a question about if it is possible to transfer selectively data to an existing word document?

but i get error 424 object required

I have the following code:
Private Sub CommandButton1_Click()


Dim wApp As Word.Application
Dim wDoc As Word.Document
Set wApp = CreateObject("Word.Application")
wApp.Visible = True


Set wDoc = Application.GetOpenFilename("Word Files (*.doc*), *.doc*")


With wDoc
.Application.Selection.Find.Text = "<<Invoerveld>>"
.Application.Selection.Find.Execute
Application.Selection = Range("A7")
.Application.Selection.EndOf


.Application.Selection.Find.Text = "<<Invoerveld>>"
.Application.Selection.Find.Execute
Application.Selection = Range("A8")


End With


End Sub