Automatizar Fox a Word

Realmente nunca me he encontrado en la necesidad de hacerlo. Pero mira te puedo recomendar esta página para que leas sobre el tema.
http://www.portalfox.com/index.php?name=News&file=article&sid=2697
mira tambien encontre esto por alli, seria bueno que lo practicaras a ver si te sireve
**************************************************
* LlamarWord
*
* Llama al Word a traves de la creacion de Object
* puede recibir parametros de documento a abrir
*
* Parametros
* -----------------------------------------------
* tcDocu Documento a abrir
* tcRuta Ruta donde se encuentra el documento
**************************************************
PARAMETERS tcDocu, tcRuta
IF TYPE(´tcDocu´) # ´C´
STORE ´Nuevo´ TO tcDocu
ENDIF
IF TYPE(´tcRuta´) # ´C´
* oGest.cDirEmp, es una propiedad
* De un objeto CUSTOM, donde guardo
* ciertos valores para la aplicacion
STORE oGest.cDirEmp TO tcRuta
endif
STORE ALLTRIM(tcDocu) TO tcDocu
STORE ALLTRIM(tcRuta) TO tcRuta
STORE tcRuta + ´\´ + tcDocu + ´.DOC´ TO tcFichero
oWord = CreateObject(´Word.Application´)
IF TYPE(´oWord´) # ´O´
* No se ha podido crear
MESSAGEBOX(´No dispone de Word para el enlace de aplicaciones´,48,´Control de datos´)
RETURN
ENDIF
* Se ha generado el objeto oWord
*********************************
oWord.Documents.Open(´&tcFichero´)
oWord.caption=´Prueba de enlace con Word´
oWord.Documents(´&tcFichero´).ACTIVATE
oWord.visible=.T.
oWord.Activedocument.PrintPreview
************ fin **********