Kayıt Sayısı

    Me.kendi_istegi = DCount("Sicili", "TblPersonel", strWhere & " AND [PasifNedeni]='İsteğiyle Emekli'")

    Me.yas_haddi = DCount("Sicili", "TblPersonel", strWhere & " AND [PasifNedeni]='Yaş Haddinden Emekli'")

kodlarını

Me.FilterOn = True

kodunun altına taşıyınız.

Teşekkürler. Çözüldü.