OLE between Notes and Word

I want to create a new word document with Lotus Notes and save there some entries from my Notes Form.

I created a button on a Form with the following
     Dim uiws As New NotesUIWorkspace
     Dim uidoc As NotesUIDocument    
     Dim doc As NotesDocument  
     Set uidoc = uiws.CurrentDocument
     Set doc = uidoc.Document
     Dim wordApp As Variant  
     Dim wordDoc As Variant      
     Dim firstname As String
        firstname = Cstr(doc.firstname(0))
     Set wordApp = CreateObject( "Word.Application" )
        Call  wordApp.Documents.Add( "SBOR_DCS.dot")
     Set  wordDoc = wordApp.Activedocument      
     wordApp.Visible = True
     wordDoc.insert ("Test") <-- don´t work.

After pressing button, Word is opening but I´m unable to insert text into the document.
Error : Instance member INSERT doesn´t exist!!

What is wrong???

Who is Participating?
AndrewJayPollackConnect With a Mentor Commented:
looks like the version of "word.application" doesn't create an object "worddoc" that has the method "insert"  somethings wrong with your use of the word object model.  
ZvonkoConnect With a Mentor Systems architectCommented:
In Word Application model does Document object not have an Insert method.

Correct call is:

wordApp.Selection.TypeText "Hallo test"

All Courses

From novice to tech pro — start learning today.