Public Function kaconeri(trh As Date, sicili As Double)
kaconeri = DCount("*", "[öneri tablosu]", "[sicil no]=" & sicili & _
 " and month([öneri tarihi])=" & Month(trh))
End Function

SELECT [öneri tablosu].[sicil no], MONTH([öneri tarihi]) AS AY, [öneri tablosu].[öneri durumu], COUNT([öneri tablosu].[öneri durumu]) AS ÖneriSayısı, kaconeri([öneri tarihi],[sicil no]) AS Top_Öneri_Sayı, 3-([Top_Öneri_Sayı]) AS EksikÖneriler
FROM [öneri tablosu]
WHERE ((([öneri tablosu].[öneri tarihi]) BETWEEN #2/12/2012# AND #12/12/2012#))
GROUP BY [öneri tablosu].[sicil no], MONTH([öneri tarihi]), [öneri tablosu].[öneri durumu], kaconeri([öneri tarihi],[sicil no])
ORDER BY [öneri tablosu].[sicil no], MONTH([öneri tarihi]);