(22/01/2020, 11:31)accessman yazdı: Private Sub cmdKapat_Click()
    On Error GoTo Err_cmdKapat_Click


Exit_cmdKapat_Click:
    Exit Sub

Err_cmdKapat_Click:
    MsgBox Err.Description
    Resume Exit_cmdKapat_Click

End Sub


bunu nasıl genel hale getirebiliriz

On Error GoTo Err_cmdKapat_Click
......
Exit_cmdKapat_Click:
    Exit Sub

Err_cmdKapat_Click:
    MsgBox Err.Description
    Resume Exit_cmdKapat_Click


bu kısmı hangi kod arasına yapıştırsak çalışacak şekilde yazmalıyız

Kod şöyle çalışır sizinki.
Hata varsa 

Err_cmdKapat_Click buraya gider hata mesajı çıkar ve alttaki resume ilede

Exit_cmdKapat_Click buraya gider.

Yani uzun işlem oluyor.Otomatik ekliyor heralde Access bunları makro olayında.