Detecting, getting and piloting MS Word from a VB app -

In a VB6 application, I create an MS Word instance and pilot this application directly from the VB application. Using for that the following code :

Dim objWord As Object
Dim objBasic As Object
Set objWord = CreateObject("word.application")
Set objBasic = CreateObject("word.basic")
With objBasic
.FileNew Template:=("c:\template.dot"), NewTemplate:=0
.Insert "this is a line into word from VB app"
.InsertPara
....
....
End With

But I would like to use, in the same way and if it is present at running time, an already loaded instance of MS Word (for example previoulsy launched by the user).

I know how to test if an instance of MS Word is running, by using FindWindow("OPUSAPP", 0). But my problem is : how can I get, catch and pilot an existing instance of MS Word the same way as described here above (using the Word.Basic commands). I tried several ways with GetObject... but I was never able to catch this instance... in fact in my last attempts it creates always a new instance of Word. Maybe someone can give me some tips. Thanks !