La Web del Programador: Comunidad de Programadores
 
    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