(28/06/2020, 15:50)feraz yazdı:

(28/06/2020, 15:15)kanakan52 yazdı:

(28/06/2020, 14:34)feraz yazdı:

(28/06/2020, 14:27)kanakan52 yazdı: Ajandam.alan

Burdaki Ajandam yazan yere gerek yok.

Ve bir değişken tanımlayın dim x gibi mesela
X= "alanad" olarak girin.Whereden sonra " & x & "
Gibi deneyebilirsiniz örneğin.

Hocam birşeyler yanlış gidiyor ama anlamadım. Denemeye devam ediyorum..

Alan adını tamam gibi de kriterde hata veriyor şimdide...

Kriter olayında tek tırnak olaylarına dikkat edim abey.

Eşittir olayını yaptım hocam, ancak arasında için between kullanımını nasıl yaparım ?

If ComboBox15.Value = "Arasında" Then

'rs.Open "select*from Ajandam WHERE int([" & alan & "]) >" & CDbl(CDate(secim)) & " and >" & CDbl(CDate(secim2)) & "", baglan, 1, 1