Teşekkür ederim puletin hocam ,

Malesef sıralama sicil numarası na küçükten büyüğe doğru olacak şekilde olması gerekiyor. Ayrıca yeni kayıt girerken sicil no diğer kayıtlara göre büyük yada kücükte olabiliyor. Bu yüzden ben yeni kayıt girildikten sonra alt form ve formda mutlaka yeni kayda gitmeye çalışıyorum.

fakat daha çözemedim :S

Arkadaşlar bir kaç gündür araştırmama rağmen yeni kayıt yaptıktan sonra o kayda gidebileceğim bir kod ben bulamadım. Sizde bilmiyorsanız başka yöntemler denemeye başlayacam ...

iyi çalışmalar ...

vb sayfasındaki

Option Explicit

kodunun hemen altına

Dim YeniKayitSicil As Integer

kodunu ekle,

iscinar'ın verdiği kaydet butonu kodunu aşağıdaki ile değiştir.

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Me.Personel_Alt_Formu.Requery

Me.RecordSource = "Select * From Personel where [Sicil] = " & YeniKayitSicil

Mevzuyu doğru anladıysam bu problemi çözer.

sledgeab hocam , kodlarınız sorunu çözmedi ama bana yol gösterdi ;)

kodları şu şekilde değiştirerek sorun çözüldü...

 Dim YeniKayitSicil As Long 

Private Sub Kaydet_Click()

 YeniKayitSicil = Me.Sicil

 DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

 Me.Personel_Alt_Formu.Requery

 Me.RecordSource = "Select * From Personel where [Sicil] = " & YeniKayitSicil

End Sub

Sorun çözülmüştür, yardımcı olan herkese teşekkürler ...