Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Access » FILTRAR SI/NO/TODOS

Access - FILTRAR SI/NO/TODOS

Volver
Nuevo Tema
<<>>
   
Vista:
Mensajes realizados anteriormente (No estaban la última vez que entraste)FILTRAR SI/NO/TODOS
roberto (23/09/2015 15:16:13)175 visitas
1 respuesta
Mensajes realizados anteriormente (No estaban la última vez que entraste)FILTRAR SI/NO/TODOS
Enrique Heliodoro (23/09/2015 16:17:21)

FILTRAR SI/NO/TODOS

Publicado por roberto (11 intervenciones) el 23/09/2015 15:16:13
Hola

Ojalá puedan ayudarme con este problema, quiero realizar un filtro dentro de un control de ficha. La pestaña que quiero filtrar es Datos personales y el campo si/no a filtrar es ACTIVO el nombre del from es PERSONAL. Este es el código pero me arroja este error de compilación "no se encontró el método o dato miembro".

gracias de ante mano, saludos.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub cboFiltro_AfterUpdate()
Me.PERSONAL.Form.FilterOn = False
Select Case Me.cboFiltro
   Case "Si"
      Me.PERSONAL.Form.Filter = "Seleccion = True"
 
   Case "No"
      Me.PERSONAL.Form.Filter = "Seleccion = False"
 
   Case "Todos"         ' sin filtro

      Me.PERSONAL.Form.Filter = vbNullString
 
End Select
Me.PERSONAL.Form.FilterOn = True
End Sub
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

FILTRAR SI/NO/TODOS

Publicado por Enrique Heliodoro (1663 intervenciones) el 23/09/2015 16:17:21
Super elemental:

Case Si= True (o -1)
Case No = False (o cero)
Case todos = FilterOn= False

En definitiva el 'si' o el 'no' actuaran solo si se aplica el filtro, el caso 'todos' desactivara el filtro (y poco le importara lo que tenga en el filtro).

No veo la necesidad de utilizar un Select Case para dos alternativas en dos parámetros interdependientes que solo admiten dos posibles estados.
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