Desde ya muchas Gracias y Felicidades... Hernan Suligoy
----- Original Message ----- From: Juan Rossano To: GUFA List Member Sent: Thursday, December 24, 2009 9:49 AM Subject: [SPAM-SPF] [GUFA] automatizacion vfp con word En el word tenes la funcion mailmerge para combinar un documento con un origen de datos. Normalmente es para generar desde una carta tipo varias personalizadas reemplazando nombre, direccion, etc por los valores extraidos desde un archivo o base de datos. Si en ese archivo o base de datos tenes un solo registro podes tener una carta tipo (o contrato tipo) que se personaliza reemplazando ciertos campos por tus datos. Tenes una referencia de Microsoft en http://msdn.microsoft.com/es-es/library/microsoft.office.tools.word.document.mailmerge%28VS.80%29.aspx y otra de portalfox en http://www.portalfox.com/index.php?name=News&file=article&sid=904&mode=nested&order=0&thold=0. Igualmente podes buscar en internet. Saludos Juan -----Original Message----- From: "Omar Bellio" <[email protected]> To: "GUFA List Member" <[email protected]> Date: Thu, 24 Dec 2009 08:11:34 -0300 Subject: [GUFA] automatizacion vfp con word Hernán, yo uso el siguiente código para buscar y reemplazar texto en un word. Procedure FindText (tcText as String, tcReplacement as String, toWord as object) as Boolean tcReplacement = Iif(Empty(tcReplacement), '', tcReplacement ) #Define nTipoReemplazo Iif(Empty( tcReplacement ), 1 , 2 ) && 2 = Replace all Local llRetVal as Boolean With to Word With .Selection With . Find .ClearFormatting .Replacement. ClearFormatting EndWith Do while .T. .HomeKey(6) llRetVal = .Find.Execute( tcText) If llRetVal If Empty(tcReplacement) Exit Else .Text = tcReplacement EndIf Else Exit Endif EndDo EndWith EndWith #UnDef nTipoReemplazo Return llRetVal EndProc ----- Original Message ----- From: [email protected] To: GUFA List Member Sent: Wednesday, December 23, 2009 8:02 PM Subject: [GUFA] automatizacion vfp con word Hola Amigos, necesito conformar un contrato de compra venta desde un formulario vfp abro un modelo del contrato en un archivo modelo guardado previamente en Word, el problema es que no puedo pasarle por variable los nombres y demas datos de las personas.. Me dan un link donde leer o me pasan un ejemplo por favor... Desde ya muchas Gracias y Saludos... HERNAN SULIGOY Rqta (Santa Fe)
