Access - liao

Estoy utilizando un código que puso el Sr. Javier ORELLANA el 12-05-2006 para Word que debe abrir un documento de Word despues reemplazar los valores de los campos del formulario, hacer una copia de un nuevo documento y guardarlo con los datos generados. el caso es que he utilizado el código y algo hago mal. Me abre el documento pero no me guarda uno nuevo. me puede alguien explicar paso a paso el código y como hago lo de declarar la aplicación de Word, muchas gracias. el documento se llama Vehiculos y se encuentra en c:Mis documentosGaraje...

Se me olvidaba el código:

Sub TRASPASO()
'inicia el word
Set objword = CreateObject("word.Application")
With objword
'hace visible la ventana de word
.Visible = True
'abre el documento de word que interactuará con access
.Documents.Open ("C:Mis documentosInstruccion 2000GarajeVehiculos.doc")
'selecciona los marcadores del documento y los reemplaza con los valores de los campos del formulario
.ActiveDocument.Bookmarks("proyecto").Select
.Selection.Text = (CStr(Forms!CREAR!PROYECTO))
.ActiveDocument.Bookmarks("area").Select
.Selection.Text = (CStr(Forms!CREAR!AREA))
.ActiveDocument.Bookmarks("documento").Select
.Selection.Text = (CStr(Forms!CREAR!DOCUMENTO))
.ActiveDocument.Bookmarks("disciplina").Select
.Selection.Text = (CStr(Forms!CREAR!DISCIPLINA))
.ActiveDocument.Bookmarks("correlativo").Select
.Selection.Text = (CStr(Forms!CREAR!CORRELATIVO))
'guarda un nuevo documento con los datos generados
strDocumento = ("c:Mis documentosGaraje" & Format(Nombre) & ".doc")
.ActiveDocument.SaveAs strDocumento
End With
Exit Sub
End Sub