VBA EXCEL: Pasar datos UserForm a Plantilla Word, creo que voy por el buen camino....

[abrahamvj]

Listo, coregido, ya lo probe, guiate de este:

Sub ahora()
Dim Worda As Object
Dim Documento1 As String
Set Worda = CreateObject("word.application")
Documento1 = "C:\Doc2.doc"
Worda.Documents.Open (Documento1)


NOMBRE = [a1]
APELLIDOS = [a2]


With Worda
.Selection.GoTo What:=wdGoToBookmark, Name:="NOMBRE"
.Selection.TypeText Text:=NOMBRE

.Selection.GoTo What:=wdGoToBookmark, Name:="APELLIDO"
.Selection.TypeText Text:=APELLIDOS
End With

Worda.Visible = True
Set Worda = Nothing

End Sub

Abraham