tamam panik yok 5. satırdaki kodu verdiğim ile değiştir Toplama işleminde Order By id desc kullanmanın gereği yok tabiki hata vermesi normal gözden kaçmış

Set ToplamKayit = Conn.Execute("SELECT Count(*) AS Hesapla FROM Liste Where Onay=1")