Aplicar varios filtros

¿Cómo puedo aplicar varios filtros sobre los datos de un formulario y que estos filtros sean acumulativos?
Esto es por ejemplo tengo 3 combos en el formulario que utilizo para definir los filtros que quiero que se apliquen, así por ejemplo si selecciono un valor en el primer combo se filtren los datos por ese valor, y si selecciono después un valor en el 2 combo se filtren los datos que ya tenia filtrados pero usando el nuevo valor para filtrarlos de nuevo.
Bno espero haberme explicado más o menos ..
Respuesta
1
Yo he realizado alguna que otra vez cosas similares a las que me cuentas y normamalmente lo he hecho utilizando combos o campos de texto más un botón que aplica/desaplica los filtros.
En el ejemplo que te pongo abajo correspondiente al código del botón aplicar filtro, tengo 4 campos de texto independientes mediante los cuales voy a filtrar un campo concreto y 3 combos situados entre ellos que me seleccionan si la operación es una Y o una O.
Al pulsar el botón de filtro, analizo los campos y monto una cadena que se la paso a me.filter y hago me.filteron=true.
Private Sub Comando58_Click()
Dim CadFiltro As String
If Not IsNull(Me.fil1) Then
CadFiltro = "(BibliografíaI2.refBiblio Like '*" & Me.fil1 & "*') "
'" Or BibliografíaI2.refBiblio Like "*1973*"))"
If Not IsNull(Me.fil2) Then
CadFiltro = CadFiltro & Me.nexo1 & " (BibliografíaI2.refBiblio Like '*" & Me.fil2 & "*')"
If Not IsNull(Me.fil3) Then
CadFiltro = CadFiltro & Me.nexo2 & " (BibliografíaI2.refBiblio Like '*" & Me.fil3 & "*')"
If Not IsNull(Me.fil4) Then
CadFiltro = CadFiltro & Me.nexo3 & " (BibliografíaI2.refBiblio Like '*" & Me.fil4 & "*')"
End If
End If
End If
Me.Filter = CadFiltro
Me.FilterOn = True
Me.lblfiltro.Visible = True
Else
MsgBox " Es obligatorio rellenar el primer término para aplicar el filtro. ", vbInformation
End If
End Sub
Me. FilX son los campos de texto y me. NexoX son los combos con la Y/O.
Entiendo como lo haces y la verdad me es muy útil.. pero ¿no hay alguna manera de sacar el filtro que se esta aplicando en un momento dado? Así podría poner en los campos que uso como filtro en el evento afterupdate un procedimiento que añadiese al filtro la nueva restricción y conseguiría que los filtros se aplicarían automáticamente sin tener que pinchar en el botón de aplicar filtro.
De todos modos gracias probare de momento con un botón de aplicar filtro.
Un saludo, Juan
Prueba a que la aplicación de filtros se realice en el evento afterupdate on al perder el foco.
La forma de ver que filtro se está utilizando es mediante me.filter, por lo que es posible que puedas hacer algo así como me.filter=me.filter & " AND " & filtro2
Donde filtro2 es la condición de tu segundo combo.
Prueba y ya me contaras

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Que si quieres arroz Catalina

He hecho las modificaciones en el código y me ha quedado como sigue: Private Sub Boton2000_Click() Dim filtroviejo As String, filtronuevo As String filtroviejo = Me.Filter filtronuevo = "(" & filtroviejo & ") and (year([FechaIn])=2000)" Me.Filter =...
1 respuesta

Filtros en formularios dependiendo de cuadros de texto

Como puedo aplicar varios filtros en un formulario dependiendo de lo que digite en varios cuadros de texto, he encontrado el siguiente código pero solamente me filtra lo que digite en el cuadro y no me deja filtrado los otros cuadros si tienen algún...
1 respuesta

Filtrar registros.

Tengo un formulario en el cual puedo introducir cuatro palabras que luego utilizo como criterio de búsqueda para filtrar los registros que contengan alguna de esas palabras en el campo Descripción. El código se dispara al hacer clic a un botón. En...
1 respuesta

Búsqueda contenido cuadro texto

Estoy haciendo una base de datos para gestionar los viajes, y desearía realizar búsqueda con un cuadro de texto, es decir, que al escribir una palabra clave del viaje me salga el viaje o los viajes que contengan esa palabra, tengo ya creado un botón...
2 respuestas

Filtrado formulario continuo basado en una consulta.

Agradecería su colaboración y ayuda en un problema que tengo en mi base de datos. Quiero generar un filtro en un formulario continuo Dispongo de un formulario creado a partir de una consulta de una tabla principal donde se recogen todos mis datos,...
1 respuesta

Consulta por rango de fechas

La consulta es muy simple pero no me esta funcionando. Tengo una tabla en la que almaceno mediante un formulario, toda la materia prima egeresada de una bodega. Necesito hacer un formulario que me permita mostrar solo los egresos que correspondan a...
1 respuesta

Búsqueda al presionar la primer letra o conjunto de palabras

Ante todo un saludo. Vaya que es difícil encontrarte... Mi pregunta va enfocada a lo siguiente: Como se puede realizar una consulta dentro de un formulario haciendo uso de botones de la A a la Z, esto es, si presiono la letra A se vaya al primer...
1 respuesta

Hola, Tengo una consulta con Formularios Access 2010

En Mi formulario existen 2 Cuadros combinados. Quisiera que cada cuadro combinado al cambiar aplique el filtro del valor seleccionado, pero que mantenga lo ya filtrado. Es decir: Selecciono en el cuadro combinado de ciudades: Ciudad1, aplique el...
1 respuesta

Contar registros filtrados

Antes de nada agradecer la ayuda ya prestada como "visitante anónimo", que es mucha. Me gustaría saber el número de registros que devuelve un filtro. He "peleado" con dcount, intentado hacer una consulta, pero nada. ¿Puede ser cosa de la sintaxis...?...
1 respuesta

Filtro en Access

Tengo un formulario -Internos hospital- con muchos campos "cuadors de texto-combinados" -nombre, fecha nací. Etc.- que se quedan guardados en registros en la tabla -Registro Internos Hospital-. He creado un nuevo formulario -filtros- y lo que quiero...
2 respuestas