Com fer perquè Access sol·liciti confirmació de modificació d'un registre d'un formulari mitjantçant codi VBA

Podem col·locar el següent codi en l'event "Antes de actualizar" ( BeforeUpdate ) del formulari i ens permetrà controlar si s'ha fet alguna modificació  abans de passar al següent registre o intentar tancar el formulari. En el cas que s'hagi modificat el registre ens demana si volem, o no, guardar els canvis.
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim strMissatge As String
Dim intResposta As Integer

If Me.Dirty Then

strMissatge = "Desitges guardar els canvis?"
intResposta = MsgBox(strMissatge, vbQuestion + vbYesNo, "Atenció!")
    
    If intResposta = vbNo Then
        RunCommand acCmdUndo
    End If
    
End If

End Sub

Comentaris

Entrades populars