Confirmação - Alterar, inserir registro

Prezados,

Fiz um formulário com menu de navegação ativado.

Quando estou navegando pelos registros, posso alterar. Porém gostaria que, caso alterado, fosse exibido mensagem pedindo OK para alterar ou cancelar. Fui em eventos do formulário, selecionei BeforeUpdate e coloquei (pego aqui em algum post):

Código:

Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim strMsg As String
Dim iResponse As Integer

  ' Especifica a mensagem a ser apresentada.
  strMsg = "Deseja salvar as alterações" & Chr(10)
  strMsg = strMsg & "Clique Sim para salvar ou Não para ignorar."

  ' Mostra a caixa de mensagem.
  iResponse = MsgBox(strMsg, vbQuestion + vbYesNo, "Salvar registro?")
 
  ' Verifica a resposta do usuário.
  If iResponse = vbNo Then
      ' Desfaz as alterações.
      DoCmd.RunCommand acCmdUndo
      ' Cancela a atualização.
      Cancel = True
  End If
End Sub


Porém não funcionou. O que fiz errado?

Alterando ou colocando novo registro ele não mostrou mensagem. Existe outra forma?

Bom dia.

Meu access é 2007 e não executou seu código corretamente avelino.

Olá CleberDantas,
Bloqueie o seu Formulário de formna que não se possa fazer alterações, a menos que você selecione um botão para essa função.
Em Formluário, vá em Folha de Propriedades, Dados, e na opção Permitir edições, coloque "Não", daí o seu Formulário não permitirá edições, a menos que você queira, pressionando um botão para inclusão de registro e outro para alteração do mesmo.
Espero ter ajudado.
Abrçs.

Wallace,

Obrigado pela resposta. Amanhã irei testar e te aviso, mas sua explicação foi bem proveitosa!