insanlık hali gözümden kaçmış olabilir ama
tekrar kontrol ettim ve benim söylediğim şekilde doğru olduğunu düşünüyorum.
Kod:
If Dcount(...) > 0
sizin dediğiniz ">0" kriteri parantezin içinde kalırsa
Kod:
If Dcount(...)
Çünkü Dcount() fonksiyonundan dönen değerin sıfırdan büyük olup olmadığına bakmaya çalışıyoruz.
VBA'de If kontrolüne Breakpoint koyup Immediate penceresinde "?" ile kriter kısmına bakarsanız daha iyi görebilirsiniz.
Benimkinde, Kriter = "[AdiSoyadi]='HASAN HÜSEYİN' And [Tarih]=#01/01/2009# And [Saat]=#18:00:00#"
Sizinkinde, Kriter = "[AdiSoyadi]='HASAN HÜSEYİN' And [Tarih]=#01/01/2009# And [Saat]=#18:00:00# > 0"
Yani parantez içinde kaldığında, saat eşitliğinin sıfırdan büyük olup olmadığını kontrol etmiş gibi oluyor.
Benim yazdığım kodda bu daha doğru olarak görünüyor.
Kod:
If DCount("*", "HATIRLATMALAR", Kriter) > 0 Then