Llamar a Word desde macor de Excel
Tengo una macro en Excel que me hace varias cosas. Para que mi macro avance a un nuevo nivel, necesito que desde ella se llame a Word y con los datos que tengo en Excel se haga un documento. No sé si esto se puede hacer. Mi intención sería que después de hacer el documento se pudiera imprimir directamente, o preguntara si se desea hacer. De todas formas mi primer paso sería llamar a Word como he dicho. Gracias
1 respuesta
Entra al Editor de macros y desde menú Herramientas, Referencias, activa la que se llame Microsoft Word... (el nro dependerá de tu version Office).
A continuación inserta un modulo y pega esta macro a la que ajustaras según tu rango.
Sub llamaWord()
'x Elsamatilde
'seleccionar o definir el rango que se pasarà a word
Range("A2:E20").Copy
'Declarar el objeto Word
Dim appWord As Word.Application
'Crear una nueva aplicación Word
Set appWord = New Word.Application
'Activar la aplicación Word
With appWord
.Visible = True
.Activate
End With
'Crear un nuevo documento
appWord.Documents.Add
'Allí se pegará el rango seleccionado previamente desde Excel
appWord.Selection.Paste
'imprimir el word - vista previa
appWord.PrintPreview
'liberar la variable
Set appWord = Nothing
End SubEsto creo responde a tu consulta. Luego podras ir mejorandola (dejando nuevas consultas), por ej solicitando confirmacion para la impresion, guardar o no el doc, etc.
Sdos
Elsa
¡Gracias! , es una pasada tu control Elsa Matilde, voy a probarla y a trabajarla, que me llevará un tiempo y ya paso después a la segunda fase. Muchísimas gracias.
