En una BD de MS Access 2010 quiero ir a un formulario especifico desde un cuadro de lista con doble click.

Tengo una base de datos en Access 2010 y quiero ir desde una un "Nombre" en un cuadro de lista a un formulario especifico, me muestra error, este es código que tengo en el cuadro de lista:

Private Sub ListaR_DblClick(Cancel As Integer)

Dim rst As Recordset
Select Case Me.Busque
Case Is = "1"
DoCmd.OpenForm "Datos"
Set rst = Forms![Datos].RecordsetClone
rst.FindFirst "Nombre = " & Me.ListaR
Forms![Datos].Form.Bookmark = rst.Bookmark
DoCmd.Close acForm, "Busqueda"
Case Is = "2"
DoCmd.OpenForm "Presupuesto"
Set rst = Forms![Presupuesto].RecordsetClone
rst.FindFirst "Nombre = " & Me.ListaR
Forms![Presupuesto].Form.Bookmark = rst.Bookmark
DoCmd.Close acForm, "Busqueda"
End Select

End Sub

Los caso Case 1 y 2 son por las opciones de búsqueda previas que use como filtro para arrojar resultados en el cuadro de lista. (Es una búsqueda).

Me arroja error de sintaxis 3077, además no me envía al formulario deseado, sino al formulario del primer registro. ¿Qué estoy haciendo mal?

1 respuesta

Respuesta
1

A ver así:

Private Sub ListaR_DblClick(Cancel As Integer)
Select Case Me.Busque
Case Is = "1"
DoCmd.OpenForm "Datos",,,"Nombre = " & Me.ListaR 
Case Is = "2"
DoCmd.OpenForm "Presupuesto",,,"Nombre = " & Me.ListaR 
End Select
DoCmd.Close acForm, "Busqueda"
End Sub

Si ListaR devuelve un valor de texto, la condición tiene que ser:

"Nombre='" & Me.ListaR & "'"

¡Gracias! . Amigo fue de mucha ayuda su información, no pude solucionar el problema de esa forma pero pude entender que estaba ejecutando la búsqueda sin contadores.  Muchas gracias por su respuesta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas