AccessTr.neT
Kod ile kayıt cogaltma - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Kod ile kayıt cogaltma (/konu-kod-ile-kayit-cogaltma.html)



Kod ile kayıt cogaltma - nacar - 17/02/2015

 

   Merhaba
   Aynı tablo üzerinde sorgu ile seçtiğim kayıtların çoğalmasını istiyorum.
  Komut düğmesi sihirbazındaki kayıt çoğalt özelliği ile yapabiliyorum ancak makro bir süre sonra çalışmıyor.
   Kayıt çoğaltma işlemini kod ile nasıl yaparım ?


Cvp: Kod ile kayıt cogaltma - ozanakkaya - 17/02/2015

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.


Cvp: Kod ile kayıt cogaltma - nacar - 18/02/2015

Çok teşekkür ederim Sn: ozanakkaya