Sayın atoz112 ellerinize sağlık tam istediğim gibi butona basınca istediğim yere kaydediyor. Yalnız küçük bir sorun var. Açıklama kısmında yazdığınız değişiklikleri yaparak ID'ler yerine tam adları yazdırmak istedim ama bir değişiklik olmadı, yine ID numaraları yazılıyor. Siz en alttaki komutları şöyle yazmışsınız;

Me.Açılan_Kutu0 = Me.Açılan_Kutu0.Column(0)
Me.Açılan_Kutu4 = Me.Açılan_Kutu4.Column(0)  

Parantez içindeki 0 yerine 1 yazınca tam adlar geliyor ancak bu seferde butona basınca bazı alanlar siliniyor. Bunu düzeltebilirsek (bu arada tüm alanları tam adlarıyla göstermek istiyorum) sorunum tamamen çözülmüş olacak.

Şimdiden teşekkürler.