(26/06/2020, 18:32)feraz yazdı: Alttaki kodu deneyin ayrıca hücreleri temizlemek için kodda ekledim.Koda eklersiniz.
Cells.ClearContents
Sorgu = "select * from [yükleme$] where format(f3,'dd.mm.yyyy') = '" & Format(CLng(CDate(TextBox1.Value)), "dd.mm.yyyy") & "'"
Hocam destek için teşekkürler, sorunsuz çalışıyor...
(26/06/2020, 19:20)berduş yazdı: aşağıdaki kodu da deneyebilirsiniz
Sorgu = "select * from [yükleme$] where fix(f3) = " & Fix(CDbl(CDate(TextBox1.Value))) & ""
@berduş hocam selamlar..
Yine klasınızı konuşturmuşsunuz.. fomatla falan uğraşma diyorsunuz yani
