Insertar texto en word con basic 6.0 Lo que pretendo es mediante una macro en excel, colocar un boton en esa excel que copiaria los datos de varias celdas sobre unos marcadores del documento word. Pero a la hora de abrir el word me da error, no se porque (creo que le pido demasiado a las macros de excel), este es mi codigo:
Private Sub CommandButton1_Click()
Dim Documento As New Word.Application
With Documento
'para abrir un documento
.Application.Documents.Open ("\Draft_EU TPM Audit results report_rev.EN01.doc")
.Application.Selection.TypeText "Ejemplo de prueba"
'muestra el documento
.Application.Visible = True
End With
Set Documento = Nothing
End Sub
¿Como deberia hacerlo?
Gracias
