yazdığınız kod metin kutularına sadece kendi tablosuna kaydediyor ama aşağıdaki kodda yatak katsayısı tablosına kayıt yapıyor formlar iç içe olduğunda ben formlar bu şekilde iken aynı mantıkla işlem yapmasını istiyorum...

If Seçenek157 = -1 Then

With DoCmd

.SetWarnings False

.RunSQL "insert into SONDAJYATAKKATSAYISI(qem,ÇALIŞMAADI,GS)" _

& " select [Forms]![PROGRAM]![TERZAGHİ]![qemD],[Forms]![PROGRAM]![TERZAGHİ]![ÇALIŞMAADI],[Forms]![PROGRAM]![TERZAGHİ]![GSD]"

.SetWarnings True

End With

End If