1
Abrir Excel , a continuación, escriba una lista de nombres en una columna y las edades en una columna adyacente . Marque la parte superior de estas columnas con el texto " nombres " y "edad ". Este paso crea una base de datos de datos de ejemplo para su programa de SQL para recuperar . Puede crear una tabla con diferentes datos si lo desea.
2
Arrastre una región de selección alrededor de la mesa, a continuación, escriba " MyTable " en el cuadro de texto a la izquierda de la barra de fórmulas . Esto crea un nombre de rango para los datos de la muestra , que tendrá su programa para acceder a los datos
3
Guarde el archivo como . "C: \\ MyDatabase.xlsx ", a continuación, cierre el archivo .
4
Press "Control ", seguida de "N " para crear una nueva hoja de cálculo. Usted guarda su programa de SQL en esta hoja .
5
Pulse " Alt ", seguido de " F11 " para entrar en el entorno de desarrollo de Visual Basic , abreviada normalmente como el " IDE ". Los desarrolladores escriben a veces ejecutan programas en VB en este IDE.
6
Haga clic en el menú "Insertar" , haga clic en la opción " Módulo " . Esta acción crea una nueva ventana de código para que introduzca su listado de programas SQL .
7
Haga clic en el menú " Herramientas " la partida , a continuación, haga clic en " Referencias ". Coloque una marca en la casilla de verificación " Microsoft ActiveX Data Objects . " Esta acción hace visibles los objetos de la base de datos que Excel necesita para ejecutar la consulta SQL .
8
Pega el siguiente programa en la nueva ventana de código.
Sub sqlVBAExample ()
< p> objConnection As ADODB.Connection
objRecSet As ADODB.Recordset
Set objConnection = New ADODB.Connection
objConnection.ConnectionString = " Provider = Microsoft.ACE . OLEDB.12.0 ; Data Source = c: \\ myDatabase.xlsx ; propiedades extendidas = "" Excel 12.0 Xml ; HDR = YES " " ; "
objConnection.Open
Set objRecSet = New ADODB . Recordset
objRecSet.ActiveConnection = objConnection
objRecSet.Source = " Select * From myTable "
objRecSet.Open
Range (" D10 ") . CopyFromRecordset objRecSet
objRecSet.Close
objConnection.Close
objRecSet Set = Nothing
objConnection Set = Nothing
End Sub
9
Haga clic en uno de los estados del programa, a continuación, pulse la tecla "F5 " para ejecutar el programa.
10
Pulse " Alt ", y luego " F11 " para volver a la hoja de cálculo Excel. La hoja de cálculo se mostrará el resultado de la conexión SQL que el programa establecido. Los resultados incluyen la tabla de base de datos que creó anteriormente.