DoCmd.RunCommand acCmdSaveRecord
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO koordinasyonpersonelitablosu ([okulkoordinasyongörevlisisicil]," & _
"[okulkoordinasyongörevlisiadsoyad],[okulkoordinasyongörevlisiirtibat],[okulkoordinasyongörevlisibirim])" & _
"VALUES ('" & Me.sabitokulpolisisicil & "','" & Me.sabitokulpolisiadsoyad & "','" & Me.sabitokulpolisiirtibat & "'," & _
"'" & Me.sabitokulpolisibirim & "')"
DoCmd.SetWarnings True
MsgBox "Kayıt işlemi tamamlandı", vbInformation, "AccessTR.Net"
DoCmd.GoToRecord , , acNext
olarak düzenleyin. Form üzerindeki bilgileri aynı tabloya giriyorsunuz herbirisi için ayrı ayrı INSERT sorgusu çalıştırmanıza gerek yok o yüzden herbirini yeni kayıt olarak ekliyor. Tekseferde ilgili alanlara kayıt edin.