Como Combinar correspondencia en Word usando VB
Publicado por VICTOR & PACO (3 intervenciones) el 15/09/2000 00:00:00
Tenemos el problema de querer combinar unos datos provenientes de un recordset en Vb con un archivo de Word en el que se han definido una serie de campos de combinación de Correspondencia del tipo rellenar, a los cuales les hemos dado un nombre. El sistema funciona correctamente, cuando los campos se usan una sola vez, pero no podemos repetir el mismo campo más de una vez, ya que nos ha sido imposible acceder a ellos por el nombre, sólo nos lo permite por el índice. ¿Cómo se podría acceder por el Nombre del Campo en el documento de Word? ¿Existe alguna otra forma de hacer una combinación con un recordset y documento de Word, en el que se pueda usar más de una vez un campo sin tener que enviarlo dos o más veces desde Vb? Adjuntamos el código de la sustitución de un campo que si nos funciona correctamente:
Dim DocWord As New Word.Application
DocWord.Documents.Open "C:\Mis Documentos\p6.doc", ReadOnly:=True
DocWord.Visible = True
DocWord.ActiveDocument.Fields(1).Result.Text = Data1.Recordset.Fields("nombre").
Gracias por vuestra colaboración...
Dim DocWord As New Word.Application
DocWord.Documents.Open "C:\Mis Documentos\p6.doc", ReadOnly:=True
DocWord.Visible = True
DocWord.ActiveDocument.Fields(1).Result.Text = Data1.Recordset.Fields("nombre").
Gracias por vuestra colaboración...
Valora esta pregunta


0