Dim Re, Re1, Re2 As DAO.Recordset
Set Re = CurrentDb.OpenRecordset("TERZAGHİ ŞERİT"): Set Re1 = CurrentDb.OpenRecordset("TERZAGHİ KARE"): Set Re2 = CurrentDb.OpenRecordset("TERZAGHİ DİKDÖRTGEN")
Re.AddNew: Re![TEMELTİPİ] = Me.TEMELTİPİ: Re.Update
Re1.AddNew: Re1![TEMELTİPİ] = Me.TEMELTİPİ: Re1.Update
Re2.AddNew: Re2![TEMELTİPİ] = Me.TEMELTİPİ: Re2.Update
denermisiniz.
![Çözüldü](images/icons/cozuldu.png)