(14/12/2020, 10:29)berduş yazdı: Ilgili formun olduğu çalışmanızı ekleyin inceleyelim?
Kodun tamamını görmeden bir şey söylemem zor. 3. mesajınızda tek liste için kontrol var, bu haliyle diğerleri için uyarı vermemesi gerek. Herbir liste icin ayri ayri yazdıysanız birlestirip tek kontrol dongusune sokmaniz yeterli olabilir

İlgili dosya kişisel veriler içerdiğiden ekleyemiyorum. Fakat satır kaynağı silme işini iptal ettim. Sadece response=0 ile sistemin verdiği hatayı kapatabiliyorum. Bu tabloya bağlı 3 listbox olduğu için herbiri adına hata veriyor. 1 kez vermesi benim için yeterli. İlk hatadan sonra "hata durumunda" denetiminin çalışmasını nasıl durdurabilirim? Bu da bir çözüm olacaktır diye düşünüyorum.

---

Kodun güncel hali;

Private Sub Form_Error(DataErr As Integer, Response As Integer)

  

    If Not dosyavarmi("********.accdb") = True Then

        MsgBox "Veritabanına bağlanılamadı", vbCritical, "Hata"

        Response = 0

    End If



End Sub