[VFP] Como reemplazar un texto de un documento de word

[ZeRoberto]

Hola a todos

Necesito reemplazar un texto de un documento word pero sin que se me malogre los formatos, estoy probando con esto pero el documento se me desconfigura.

loWord = CREATEOBJECT("Word.Application")

loWord.Application.WindowState = 1 && wdWindowStateMaximize

loWord.Documents.Open(tcFileName)

loWord.ActiveDocument.SaveAs("c:\test.doc")

loWord.Application.Visible = .T.

With loWord.ActiveDocument.Content

     .Text = Strtran(.Text, "<MONTO_TOTAL>", "25.33")

EndWith

--
btnMyVideo.Click()