AccessTr.neT

Bul · 27/05/2019, 11:21

Arkadaşlar merhaba,
Sonraki kayda git butonunun yeni kayda gitmsini nasıl önleyebiliriz ?

Bul · 27/05/2019, 11:32

Sonraki kayda git butonunu kodunu aşağıdaki ile değiştirerek deneyiniz

DoCmd.GoToRecord , , acNext



If Me.NewRecord Then

  DoCmd.RunCommand acCmdRecordsGoToLast

End If

Bul · 27/05/2019, 11:40

If Recordset.AbsolutePosition < Recordset.RecordCount - 1 Then  DoCmd.GoToRecord , , acNext

Bul · 27/05/2019, 13:23

Sorun çözüldü çok teşekkür ediyorum.

Bul · 03/06/2019, 12:10

Buda uyarı verdirerek bilgilendirebilirsiniz

Private Sub Komut51_Click()

If Not (CurrentRecord = DCount("Kimlik", "Demirbaş listesi")) Then

DoCmd.GoToRecord , , acNext

Else

MsgBox "Son kayıttasınız", vbInformation, "SON KAYIT BİLDİRİMİ"

Exit Sub

End If

End Sub

AccessTr.neT

Sonraki Kayda Git Butonu Yeni Kayda Gitmsin

Sonraki Kayda Git Butonu Yeni Kayda Gitmsin

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Giriş yap

Hesap oluştur

Konu Linkleri