Cómo escribir una macro en Word que lee datos de Excel

Saber cómo escribir una macro de Word que lee datos de Excel es una introducción a un método para controlar una aplicación de Office con otra. Microsoft llama a este tipo de control "Automatización". La automatización permite cualquiera de los programas de Office como Word, Excel, Access y PowerPoint, establecer un enlace con, a continuación, utilizar los objetos virtuales de otra aplicación de Office. Para escribir una macro de Word que lee datos de Excel, utilice el "CreateObject" declaración de Visual Basic para crear un enlace a Excel. A continuación, utilice ese enlace para leer datos de objeto "célula" de Excel.

Instrucciones

1 Abrir Excel, a continuación, escriba cualquier valor en la primera celda de la primera hoja de cálculo. Haga clic en el comando "Guardar" del botón de Office, a continuación, escriba "c: \ ReadFromExcel.xlsx" para el nombre de archivo. Haga clic en "Guardar" para guardar el libro, a continuación, cierre Excel.

2 Haga clic en el botón de Office en Word, a continuación, haga clic en el botón "Opciones". Haga clic en la casilla de verificación "desarrollador" para mostrar la ficha "desarrolladores", que posee comandos de macro de Word.

3 Haga clic en el botón de la pestaña "Desarrollador" "Visual Basic" para entrar en el entorno de desarrollo de Visual Basic.

4 Haga clic en el menú "Herramientas", haga clic en el comando "Referencias". Haga clic en el elemento "objetos de Microsoft Excel", que permite el acceso del macro los objetos virtuales de Excel.

5 Escriba el siguiente programa en la ventana de código. Este programa crea un enlace a la aplicación Excel, a continuación, cierre el enlace. El programa aún no hace nada con el vínculo establecido. Ahora vamos a utilizar el enlace para abrir el libro de Excel que creó en el paso 1.

Public Sub ReadExcelData ()

Dim pgmExcel Como Excel.Application

Establecer pgmExcel = CreateObject ( "Excel.Application")

pgmExcel.Quit

End Sub

6 Escriba las siguientes nuevas declaraciones después de que el "Ajuste" comunicado. Estas declaraciones abrir el libro de Excel que creó en el paso 1, a continuación, cierre el libro. El programa revisado todavía no ha leído ninguna información del libro. La siguiente sentencia que voy a escribir leerá la información del libro.

PgmExcel.Workbooks.Open "c: \ ReadFromExcel.xlsx"

7 Escriba las siguientes declaraciones después de la declaración "abierto". Esta instrucción utiliza el objeto pgmExcel para leer el valor de la primera celda en el libro desde el paso 1. El "MsgBox" declaración muestra ese valor.

MsgBox pgmExcel.ActiveWorkbook.Sheets (1) .Cells (1, 1)

8 Haga clic en cualquiera de los estados del programa, a continuación, haga clic en el comando "Ejecutar" del menú "Ejecutar". Su programa se ejecutará y mostrará el valor de la celda en la que escribió en el paso 1.