liste kutusunun tıklandığında olayına yazdığın kodu sil.
Liste kutusunun güncelleştirme sonrasında olayına yazılı

.FindFirst "[TARİH]=" & Str(Me![Liste22])

kodunu

.FindFirst "[TARİH] = #" & Format(Me![Liste22], "mm\/dd\/yyyy") & "#"

kodu ile değiştir.