Sayın yenginoglu;
Srg_ozel sorgusunu aşağıdaki şekilde değiştirin. İstediğiniz Olacaktır.
Kolay Gelsin.

SELECT tbl_kisi_bilgileri.kisi_ID, tbl_kisi_bilgileri.adi, tbl_kisi_bilgileri.Soyadi, tbl_kisi_bilgileri.sirket, tbl_kisi_bilgileri.Yetkili, tbl_kisi_bilgileri.Ozelgun, [ozelgun]-Date() AS Kalan, tbl_kisi_bilgileri.ozelgunnotu, [adi] & " " & [soyadi] AS adsoyad ,Format([OZELGUN],"dd/mm") AS YAKLASAN, DateDiff("d",Format(Date(),"dd/mm"),Format([OZELGUN],"dd/mm")) & " gün kaldı" AS kalangun

FROM tbl_kisi_bilgileri 

WHERE ((DateDiff("d",Format(Date(),"dd/mm"),Format([OZELGUN],"dd/mm"))<=10));

sayın kural ozelgun de tarih yazılı değil ise boşsa #hata yazıyor onu nasıl yazdırmayabiliriz
ve tüm bilgileri girince de hatayı bu yapıyor.

Sayın yengioğlu;
Sorgunuzda bulunan kalan alanı hataya neden oluyormuş. Aşağıdaki kodu srg_ozel sorgusunu aşağıdaki şekilde değiştirin problem kalmayacaktır.
Kolay Gelsin.

SELECT tbl_kisi_bilgileri.kisi_ID, tbl_kisi_bilgileri.adi, tbl_kisi_bilgileri.Soyadi, tbl_kisi_bilgileri.sirket, tbl_kisi_bilgileri.Yetkili, tbl_kisi_bilgileri.Ozelgun, tbl_kisi_bilgileri.ozelgunnotu, [adi] & " " & [soyadi] AS adsoyad, Format([OZELGUN],"dd/mm") AS YAKLASAN, DateDiff("d",Format(Date(),"dd/mm"),Format(Nz([OZELGUN],"1/1/2500"),"dd/mm")) & " gün kaldı" AS kalangun, DateDiff("d",Format(Date(),"dd/mm"),Format(Nz([OZELGUN],"1/1/2500"),"dd/mm")) AS İfade1

FROM tbl_kisi_bilgileri

WHERE (((DateDiff("d",Format(Date(),"dd/mm"),Format(Nz([OZELGUN],"1/1/2500"),"dd/mm")))<=10));

sayın kural -189 gün kaldı diyor ve tüm kayıtları getiriyor
yani özel gününe az kalanları vermiyor.

sayın kural <=10 un yerine between 0 and 10 yaptım ve düzeldi. ilgine teşekkür ederim.
yenginoğlu