Abrir y modificar un documento de word desde vb6
Necesito desde un sistema en visual basic 6, abrir un documento existente de word y agregarle un texto. Si bien se como generar un documento nuevo, no se como abrir uno ya existente.
Desde ya muchas gracias.
Desde ya muchas gracias.
1 respuesta
Respuesta de andriu25
1
Primero que todo debes activar la referencia de "Microsoft Word 11.0 Object Library" y después puedes incluir las siguientes líneas de código en cualquier procedimiento:
dim word1 as new word.application 'defino nuevo objeto de word
dim texto1, texto2 as string 'defino variables de tipo string
texto1 = "prueba de inserción de datos en word" 'defino texto1
texto2 = "salto de linea y escribo nuevo texto" 'defino texto2
'para el ejemplo supongo la existencia de un archivo en d llamado prueba.doc
word1.changefileopendirectory "d:\"
documents.open filename:="prueba.doc" 'abro el archivo existente
selection.typetext texto1 'inserto texto1
selection.typeparagraph 'salto de linea
selection.typetext texto2 'inserto texto2
word1.activedocument.save 'salvo el documento
word1.application.quit 'libero el objeto
'
dim word1 as new word.application 'defino nuevo objeto de word
dim texto1, texto2 as string 'defino variables de tipo string
texto1 = "prueba de inserción de datos en word" 'defino texto1
texto2 = "salto de linea y escribo nuevo texto" 'defino texto2
'para el ejemplo supongo la existencia de un archivo en d llamado prueba.doc
word1.changefileopendirectory "d:\"
documents.open filename:="prueba.doc" 'abro el archivo existente
selection.typetext texto1 'inserto texto1
selection.typeparagraph 'salto de linea
selection.typetext texto2 'inserto texto2
word1.activedocument.save 'salvo el documento
word1.application.quit 'libero el objeto
'
