Butonun tıklandığında olayına aşağıdaki kodu ekleyiniz. Bu kod ile sadece 3 alanın kopyalanmasını sağladım, diğer tarih alanlarının da kopyalanmasını istiyorsanız koda ekleme yapılması gerekiyor.

DoCmd.SetWarnings False



DoCmd.RunSQL "INSERT INTO Tablo1 ( adısoyadı, Adres, [not] ) SELECT Tablo1.adısoyadı, Tablo1.Adres, Tablo1.[not] FROM Tablo1 WHERE (((Tablo1.sırano)=[Formlar]![cogalt form]![sırano]));"

DoCmd.SetWarnings True

DoCmd.RunCommand acCmdSaveRecord

Me.Requery

DoCmd.GoToRecord , , acLast

Ayrıca, tablonuzda bulunan "not" isimli alanın ismini değiştiriniz. Kod yazımı sırasında sıkıntı çıkarabilir.