La Web del Programador: Comunidad de Programadores
 
    Pregunta:  11371 - PASAR EL VALOR DE UN PARáMETRO A UNA CONSULTA UTILIZANDO VBA
Autor:  Marta Martínez Cabada
En Access97, como puedo pasar el valor de un campo de un formulario como parámetro de consulta a través del código VBA del formulario, ya que no quiero hacer referencia al formulario en la consulta. Gracias.

  Respuesta:  Luis Fernando Melo
Hola
Creo que puedo ayudarte ..
Primero Crea un consulta con parametros como la siguiente:

PARAMETERS ID Long; SELECT ACT.IDTACT, ACT.NOM FROM ACT;

Asignale el nombre conveniente a esta consulta, para este ejemplo podemos llamarla: SQLACT

Desde el codigo del formulario puedes ejecutar la consulta como sigue:

Dim Q as QueryDef
DIM Rs as Recordset

SET Q = dbEngine(0)(0).Querydefs("SQLACT")
Q.PARAMETERS("ID")=ValorCampoFormulario

SET RS=Q.OpenRecordSet
.......