Kod:
Private Sub filtre_Updated(Code As Integer)
DoCmd.ApplyFilter , "[KURUM KODU] like [Forms]![TÜM AH-K-Ş-A CETVELİ EN SON (2)1]![filtre] &'*'"
'DoCmd.ShowAllRecords --normal metin kutusunda bu kod ile filtre iptali yapılır
End Sub
Private Sub filtre1_Updated(Code As Integer)
DoCmd.ApplyFilter , "[EĞİTİM BÖLGESİ] like [Forms]![TÜM AH-K-Ş-A CETVELİ EN SON (2)1]![filtre1] &'*'"
'DoCmd.ShowAllRecords --normal metin kutusunda bu kod ile filtre iptali yapılır
End SubKolay gelsin...
NOT:Form adı gereğinden fazla uzun ileride problem yaşaya bilirsiniz...Daha sade bir isimolsa daha iyi olur bence
