Hola,
No sé si esto está actualizado o no, pero por el bien de cualquier lectura, responderé esto.
Entonces, el principio aquí es conectarse a su servidor primero, consultar los datos que necesita con una declaración SQL, descargarlos e imprimirlos en objetos de hoja de cálculo de Excel.
- ¿Cuáles son los pros y los contras de que Estonia obtenga el primer miembro del parlamento de AI?
- ¿Cuál es el propósito del proceso inactivo del procesador de la computadora?
- ¿Cuál será la próxima revolución informática y cómo puedo participar?
- ¿Cuáles son las startups de inteligencia artificial y aprendizaje automático más prometedoras en Nueva York / Nordeste?
- ¿Cuál es la diferencia entre ciencia de datos y aprendizaje automático?
Básicamente, usando la biblioteca ADODB, necesitarás tres subs principales.
El primero será conectar su computadora (cliente) al servidor utilizando la cadena de conexión como Alex ha mencionado. Puede ir a la página en connectionstrings.com para obtener la cadena de conexión correcta para su entorno.
Una vez que esté en línea, simplemente use la segunda declaración sub o VBA que se trata de consultar la base de datos usando una declaración SQL básica. Posteriormente, el vector de resultados estará disponible en un objeto ADODB llamado Recordset. Esta es solo una copia del resultado que obtendrá de la consulta. Le permitirá extraer datos de él y navegar por sus filas y columnas.
Luego, simplemente pegue eso en la celda de destino en sus hojas de trabajo de Excel.
La estructura principal de los subs es la siguiente (y, por supuesto, deberá adaptarlos a su situación).
Sub Connect_Query ()
Dim Connection_DB como ADODB.Connection
‘aquí declaras el objeto de conexión
Dim R_Set como ADODB.RecordSet
‘Ahora declaras el objeto recordset
Dim SQL_Statement, Connection_Str como String
Establecer Connection_DB = Nueva ADODB.Connection
Connection_DB.Connection = Connection_Str
Connection_DB.Open
‘Ahora estás en línea
‘como he mencionado, Connection_Str es simplemente una declaración de cadena’ que contiene toda la información necesaria que se necesita para conectarse a ‘su servidor (como dirección IP, nombre de host, nombre de servicio, nombre de usuario y’ contraseña, etc.)
Establecer R_set = Nuevo ADODB.RecordSet
SQL_Statement = “SELECCIONE ORDEN, CLIENTE DE LA TABLA DONDE …”
‘Para un mejor rendimiento, use nombres de columna, no permita que el código adivine
Establecer R_set = Connection_DB.Execute (SQL_Statement, Num_Row, Opciones)
‘Las opciones aquí son múltiples y son bastante útiles, consulte el sitio web diferente para el método “Ejecutar” y sus opciones.
‘Ahora el código ha ejecutado la instrucción SQL y el servidor generará el vector de resultados que se copiará en el objeto R_set. Se puede acceder a los valores utilizando la propiedad “Campos (índice)” donde el índice comienza desde 0 y es el índice de la columna. Por ejemplo, para obtener los campos de orden, utiliza R_set.Fields (0) .Value
‘Para pasar físicamente a la siguiente fila, use R_set.MoveNext. Sin embargo, no olvide usar R_Set.EOF (un valor booleano que indica, cuando es verdadero, que su cursor ha llegado al final del conjunto de registros).
‘Entonces, para copiar, por ejemplo, sus datos en Excel, use:
i = 1
Mientras no (R_set.EOF)
Hojas de trabajo (“Mis datos”). Rango (“A” e i). Valor = R_set.Fields (0). Valor
Hojas de trabajo (“Mis datos”). Rango (“B” e i). Valor = R_set.Fields (1). Valor
R_set.MoveNext
i = i + 1
Encaminarse a
‘Ahora limpiando
Establecer R_set = Nada
Establecer Connection_DB = Nada
End Sub
