Cómo acceder a una consulta SQL con VBA

Escrito por jaime avelar | Traducido por beatriz sánchez
  • Comparte
  • Twittea
  • Comparte
  • Pin
  • E-mail
Cómo acceder a una consulta SQL con VBA
Aprende a crear una consulta SQL y a ver los resultados usando VBA. (Kutay Tanir/Photodisc/Getty Images)

Visual Basic para Aplicaciones (VBA) es un lenguaje de programación de computadora diseñado por Microsoft y usado para automatizar tareas rutinarias en Access. Access es un sistema gestor de bases de datos relacionales incluido en el paquete Microsoft Office. Se accede a los resultados de salida de una consulta SQL a través de un " Recordset Object ". En unos pocos pasos puedes escribir código VBA para crear una consulta SQL y ver lo registros recuperados.

Nivel de dificultad:
Moderadamente fácil

Otras personas están leyendo

Instrucciones

  1. 1

    Abre la base de datos Northwind de Microsoft Office Access. La base de datos Northwind está incluida en el paquete Microsoft Office.

  2. 2

    Haz clic en "Herramientas de base de datos", y después selecciona " Visual Basic " para abrir la ventana de Microsoft Visual Basic. Haz clic en el campo "Insertar" y selecciona "Módulo".

  3. 3

    Copia y pega el siguiente código en tu nuevo módulo para ver el primer nombre y el número de teléfono del trabajo en la tabla "Cliente":

    Private Sub customerQuery() Dim strSQL As String Dim custRst As Recordset Dim dbs As Database Dim rstCntr As Integer Dim custStr As String

    Set dbs = CurrentDb

    strSQL = "SELECT Customers.[First Name], " strSQL = strSQL & "Customers.[Business Phone]" strSQL = strSQL & "FROM Customers;"

    Set custRst = dbs.OpenRecordset(strSQL)

    custRst.MoveLast custRst.MoveFirst For rstCntr = 0 To custRst.RecordCount - 1 custStr = custStr & custRst.Fields(0).Value & _ " is a customer and their business phone is " & custRst.Fields(1).Value & vbCr custRst.MoveNext Next rstCntr

    MsgBox custStr

    custRst.Close dbs.Close End Sub

  4. 4

    Ejecuta tu subrutina pulsando "F5".

No dejes de ver

Filtrar por:
  • Mostrar todos
  • Artículos
  • Galerías de fotos
  • Videos
Ordenar:
  • Más relevante
  • Más popular
  • Más reciente

No se encuentran artículos disponibles

No se encuentran slideshows disponibles

No se encuentran videos disponibles