| Pregunta: | 51212 - COMO SUSTITUIR CAMPOS EN UN DOCUMENTO WORD CON VISUAL BASIC. |
| Autor: | PEDRO ALVAREZ LLAMAS |
| Tengo un documento en word con ciertos campos que quiero que cambien a traves de un programa en visual basic.net y quisiera saber como se hace. He conseguido que se abra el documento, pero no como cambiar los campos en cuestión.
Un saludo. Muchas gracias | |
| Respuesta: | Jesus Salazar |
| hola primero tienes que poner en tu documento de word los campos con key o indices que son con los que los vas a identiicar desde vb(6). despues en vb. pones esto:
Dim wrdAplicacion As Word.Application Dim wrdDocumento As Word.Document Set wrdAplicacion = New Word.Application Set wrdDocumento = wrdAplicacion.Documents.Add(ruta archivo\nombre.doc") wrdDocumento.Bookmarks("Marca1").range.Text = "datodelcampo" wrdDocumento.Bookmarks("Marca2").range.Text = "datodelcampo" wrdDocumento.Bookmarks("Marca3").range.Text = "datodelcampo" wrdAplicacion.Visible = True 'abre el documento de word wrdAplicacion.PrintOut 'manda a impresora wrdDocumento.Saved = True wrdDocumento.Close Set wrdDocumento = Nothing wrdAplicacion.Quit (False) 'esnecearia esta linea para que no se quede la aplicacion en memoria Set wrdAplicacion = Nothing nota: solo funciona con office xp con el 2003 no jala espero que te sirva | |