Koddaki atamaları kaldırın ve
txtAktifKayit 'nın kayıt kaynağına
Kod:
	=[CurrentRecord]Kod:
	=RecordsetClone.RecordCountfiltre uygulandığında çalışmıyor demişsiniz ama sizin formda filtreleme göremedim. Üstte Ara var, ancak o formdaki kayıt sayısını değiştirmiyor, sadece istenilen kayda gidiyor o kadar.