Access - A vueltas con los filtros por cuadro combinado

 
Vista:

A vueltas con los filtros por cuadro combinado

Publicado por Jesús (1 intervención) el 05/06/2013 14:43:15
Hola amigos

He buscado en el foro sobre el asunto y he encontrado varias respuestas. También he utilizado los códigos que habéis puesto por aquí pero no consigo que me funcione.

Ya podréis imaginar el problema:

Utilizo Access 2010. He creado un formulario en blanco donde he colocado un combo box y un subformulario

El origen de los datos del combo es el campo ENTRADA de la tabla Resueltas

El contenido del subformulario son todos los registros de la tabla Resueltas

Quiero que al seleccionar una determinada fecha en el combo box aparezcan en el subformulario sólo los registros cuyo campo ENTRADA sea coincidente al valor del combo box.

Pongo este código:

Private Sub Cuadro_combinado0_AfterUpdate()

Me.Refresh
Secundario12.SetFocus
Me.Filter = "ENTRADA = '" & Cuadro_combinado0.Value & "'"
Me.FilterOn = True
Me.Refresh

End Sub

Y "ni flowers"... El combo se refresca con el valor que he seleccionado, el subofmulario recibe el foco pero no se aplica el filtro y tampoco da un mensaje de error

¿Alguien sabe por qué?

Muchísimas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

A vueltas con los filtros por cuadro combinado

Publicado por deneg_nhj (348 intervenciones) el 05/06/2013 19:13:27
Mira aquí www.sgh.com.mx/blog, el tema "Filtros sencillo con VBA" y también el tema que se llama "Filtros y reportes", en ellos se abordan temas de filtrados y luego utilizar el filtro en un reporte.


Espero que te ayude

Saludos!

deneg_nhj
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Norberto
Val: 1.094
Oro
Ha mantenido su posición en Access (en relación al último mes)
Gráfica de Access

A vueltas con los filtros por cuadro combinado

Publicado por Norberto (753 intervenciones) el 06/06/2013 14:43:50
Hola.

No me extraña que ni flowers. Estás estableciendo el filtro para el formulario y los datos están en el sub. Prueba esto:

1
2
3
4
5
6
7
8
9
Private Sub Cuadro_combinado0_AfterUpdate()
 
    Me.Refresh 'No sé para qué. Prueba a quitarlo.
    Me.Secundario12.SetFocus
    Me.Secundario12.Form.Filter = "ENTRADA = '" & Cuadro_combinado0.Value & "'"
    Me.Secundario12.Form.FilterOn = True
    Me.Refresh 'Sigo sin saber para qué.
 
End Sub


De todas formas yo lo intentaría vinculando el subformulario con el combo:

Vincular campos secundarios: ENTRADA
Vincular campos principales: Cuadro_combinado0

Y no le pongas nada de código. A ver si te funciona.

Un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar