Formunuza

Private svdt As Boolean

şeklinde True/False değer döndürecek bir boolean değişken ekleyin.

Form OnCurrent olayına

svdt = false 

Form BeforeUpdate olayına

If svdt = False then

Cancel = True

Me.Undo 'değişiklikleri geri almak için

Cancel = False

End If

Kaydet butonu OnClick olayına

svdt = True

DoCmd.RunCommand acCmdSaveRecord 'veriyi kaydetmek için

Msgbox "Kaydedildi",VbOkOnly+vbInformation 'kaydedildiğine ilişkin mesaj vermek için

svdt = False

Docmd.GoToRecord ,,acNewRec 'kaydettikten sonra yeni kayıda geçmek için

kodlarını girerek sadece kaydet butonu ile kaydedebilirsiniz.

Form üzerinden eski kayıtların güncellenmesini me.dirty ile izleyebilir senaryonuzu buna göre uyarlayabilirsiniz. Form ilk yüklendiğinde dirty default olarak false'tur ve form üzerinde değişiklik yapılmış ise true değer döndürür.