Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Cómo crear un archivo en word desde vba – excel

| 2 Comments

Para crear un archivo en Word desde el editor de visual basic:

1.- Se tiene que entrar a Herramientas y hacer clic en REFERENCIAS y finalmente activar Microsoft Word.

2.- Escribir el siguiente código:

Public Sub pruebaword1()
Dim objWord As Word.Application
Dim cadena As String

cadena = “Texto que quieres crear en un archivo de word ”
cadena = cadena & “texto de una celda en excel que quieres añadir en word(A1): ” & ThisWorkbook.Worksheets(“Hoja1”).Range(“A1”).Value
cadena = cadena & “texto de otra celda que quieras añadir(B1): ” & ThisWorkbook.Worksheets(“Hoja1”).Range(“B1”).Value

Set objWord = CreateObject(“Word.Application”)

objWord.Documents.Add
objWord.ActiveDocument.Content.FormattedText.Text = cadena
objWord.ActiveDocument.SaveAs “c:\pruebaword1
objWord.Quit True
Set objWord = Nothing
End Sub

*nombre con el que quieres guardar el archivo de word

Ejemplo:

Crear un archivo en word que contenga el siguiente texto:

Estos son dos valores muy importantes de la persona: honestidad y otro no menos importante: el amor

* honestidad (celda A1)

*el amor (celda B1)

Ejemplo de archivo en word con VBA

Resultado de la ejecución de un archivo en word con VBA

Elaborado por: Kathia Ordoñez 

2 Comments

  1. Te felicito por tu site, Fernando. Estoy en Excel school con Chandoo.org (India) y definitivamente tengo un strong intermédiate level, espero seguir tu programa Advanced Excel (Macros) antes que se acabe este año.

  2. Me parece muy interesante esta macro, la pregunta es se podria copiar tambien graficos de la misma forma a word?

Deja un comentario

Required fields are marked *.


Excel Avanzado located at , Lima, Perú . Reviewed by usuarios rated: 4.7 / 5