(05/11/2018, 21:28)haliliyas yazdı: sayın oğuz türkyılmaz 
1 - resimdeki kütüphaneleri ekleyip



2 - 
Dim dba As Database
Dim Wr As Recordset  yazan kodların başına "DAO." eklediğimde sorun çözüldü (en azından bende öyle görünüyor).

Dim dba As dao.Database
Dim Wr As dao.Recordset
 yalnız bölünmüş veritabanında veritabanının yedeğini almıyor gibi geldi
sadece form rapor gibi nesneleri yedekliyor

    Benim indirdiğim uygulamada kodlar bu şekilde

Dim db As dao.Database
Dim rs As dao.Recordset

Sizin belirttiğiniz bu kodları
Dim dba As Database
Dim Wr As Recordset

vba kodlarımın içinde göremedim.