[Resolvido]Antes de Sair - Guardar

boas,
abri( pesquisa ) um registo e se andar com os botões de próximo registo, ou mesmo antes de sair solicitar se pretende guardar os dados ( posso ou não ter efectuado alterações )
Obrigado

1º tem de criar um botão para cada navegação
2º inserir uma mensagem em cada um deles.

Olá,
Não era bem isso que pretendo, imagine-se o seguinte se por exemplo altera-se algo que não se quer alterar sem querer e ao sair se dizer NÃO não grava alteração...

Dê uma procurada aqui mesmo, tem muita coisa sobre isso.

Pressione o link da minha assinatura e pesquise por Dirty ou "Salva se quiser"

Bom dia companheiros, o mestre JPaulo tem razão! E o código é do próprio.

Private Sub seubotão_Click()
On Error Resume Next
If Me.Dirty Then
If MsgBox("O Registo foi alterado ou incluído. Deseja salvar?", vbExclamation + vbYesNo, Me.Caption) = vbYes Then
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Else
Me.Undo
DoCmd.CancelEvent
End If
End If
DoCmd.Close acForm, "NomeSeuForm"
End Sub


Funciona perfeitamente, se você alterar qualquer campo no form ele pergunta se deseja salvar as alterações, se você não alterar nada no form, a pergunta é cancelada!

Obrigado

O forum agradece, obrigado pelo retorno!

Esse maravilhoso código é do admirável JPaulo! Todos os companheiros estão de parabéns, um abraço a todos!