
Filtros en Acces con VB
Publicado por Rosendo (2 intervenciones) el 17/04/2017 22:46:25
Buen día:
Estoy tratando de utilizar filtros, en un formulario de Access junto con un subformulario al aplicar el primer filtro desde un botón lo hace perfectamente, pero cuando quiero volver a filtrar la información desde otro campo el primer filtro que aplique se pierde ¿Cómo puedo hacer para que yo pueda aplicar los filtros y me respete los anteriores?
Este es el codigo que estoy utilizando:
De antemano muchas gracias!
Estoy tratando de utilizar filtros, en un formulario de Access junto con un subformulario al aplicar el primer filtro desde un botón lo hace perfectamente, pero cuando quiero volver a filtrar la información desde otro campo el primer filtro que aplique se pierde ¿Cómo puedo hacer para que yo pueda aplicar los filtros y me respete los anteriores?
Este es el codigo que estoy utilizando:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub bautor_Click()
Dim fautor As String
fautor = "Autor LIKE'*" & Me.tautor & "*'"
Me.buscar.Form.Filter = fautor
Me.buscar.Form.FilterOn = True
End Sub
Private Sub bobra_Click()
Dim fobra As String
fobra = "Obra LIKE'*" & Me.tobra & "*'"
Me.buscar.Form.Filter = fobra
Me.buscar.Form.FilterOn = True
End Sub
Private Sub brubro_Click()
Dim frubro As String
frubro = "Rubro LIKE'*" & Me.trubro & "*'"
Me.buscar.Form.Filter = frubro
Me.buscar.Form.FilterOn = True
De antemano muchas gracias!
Valora esta pregunta


0