Visual Basic - Urgente ayuda Vb6.0 y word

Hola buenas gracias por el tiempo que me emplea.
Quiero con mi programa de vb6.0 arrancar una plantilla que tengo en microsoft word para rellenar los campos que yo quiera.He usado la correspondencia , pero cuando ya voy a ejecutarlo con mi programa visual basic te pongo el codigo:

Private Sub Form_Load()
Dim Documento As New Word.Application
With Documento
'abre un documento
.Application.Documents.Open App.Path & "\ejemplo.doc"
'relleno de marcadores
.Documents.Item(1).Bookmarks.Item("Marcador1").Range.Text = "TITULO"
.Documents.Item(1).Bookmarks.Item("Marcador2").Range.Text = "OTRO TEXTO"
'final del documento
.Application.Selection.EndKey wdStory
'intro
.Application.Selection.TypeParagraph
'introduccion de texto
.Application.Selection.TypeText "Ejemplo de prueba"
'intro
.Application.Selection.TypeParagraph
.Application.Selection.TypeParagraph
.Application.Selection.TypeParagraph
'crear tabla
.Documents.Item(1).Tables.Add Documento.Application.Selection.Range, 3, 5
'relleno de tabla
.Documents.Item(1).Tables(1).Cell(1, 1).Range.Text = "Celda 1"
'mostramos documento
.Application.Visible = True
End With
Set Documento = Nothing
End Sub

me da problemas a la hora de enlazar el vb6 con el documento word.abre el documento word pero cuando va a cargar me da el siguiente problema

Runtime -2147417851(80010105)
Automation error

y me marca la siguiente linea el debug:
.Application.Documents.Open App.Path & "\ejemplo.doc"

me he metido en diferentes foros y los ejemplos que proporcionan y que la gente comenta que funcionan a las mil maravillas a mi me dan el mismo error.
Solo me cabe pensar que sea un problema de mi vb6.0 o de mi version de word o algo asi.

Muchas gracias por ayudarme estoy desesperado.un saludo
un saludo y gracias