tarih ölcütüne Is Not Null koyarak deneyin ,sogunuzu bunla değiştirin
SELECT Kisiler.Kisi, Kisiler.DogumTarihi, Year([KutlamaTarihi])-Year([DogumTarihi]) AS Yas, SonrakiDogumGunu([DogumTarihi]) AS KutlamaTarihi, IIf([KutlamaTarihi]=Date(),"Bugün",([KutlamaTarihi]-Date()) & " gün sonra") AS NeZaman, GunAdi([KutlamaTarihi]) AS GunAdi, Choose(Weekday([KutlamaTarihi]),"Pazar","Pazartesi","Salı","Çarşamba","Perşembe","Cuma","Cumartesi") AS [GunAdi2 (Choose ile)], DateSerial(IIf(DateSerial(Year(Date()),Month([DogumTarihi]),Day([DogumTarihi]))>=Date(),Year(Date()),Year(Date())+1),Month([DogumTarihi]),Day([DogumTarihi])) AS KutlamaTarihi2
FROM Kisiler
WHERE (((Kisiler.DogumTarihi) Is Not Null))
ORDER BY SonrakiDogumGunu([DogumTarihi]);