Alıntı:Hata veriyor.

diye yazmışsınız ama nasıl bir hata verdiğini yazmamışsınız maalesef.

Sanırım DAO ile ilgili satırda hata alıyorsunuz. Bunun için Vba Kod penceresinde iken, Menüden Araçlar-Referans'ı seçin, gelen listeden, "Microsoft DAO 3.6 Object Library" 'yi işaretleyin. (Bende 3.6 versiyonu var ama sizde Microsoft DAO'lardan en büyük hangisiyse onu seçin).

Ayrıca
yazan kısımdaki tablo adı hatalı, bu tablo adını düzeltin.
Çünkü sizin tablonuzun adında boşluk yok.

hocam sorunu hallettim. Yardımlarınız gerçekten çok sağolun...