[Resolvido]Salvar qualquer alteração

E aí feras do Access!

Rapaziada é o seguinte:

Eu tenho um formulário "Tesouraria" vinculado a um sub-Formulário "Detalhes da Tesouraria", e o que eu quero fazer é aparentemente
simples, mas eu não consegui ainda.

Eu quero Fechar o formulário no "X" e ele me perguntar se eu desejo salvar as alterações por menor que sejam em qualquer
parte do formulário ou do sub-formulário. Por exemplo : Se eu apagar uma letra e digitá-la novamente, seja motivo para me perguntar
se eu desejo salvar as alterações.
É possível?

Grato!

Meu amigo, não deu uma pesquisada antes né???

No botao de fechar nao muda nada ta... deixa apenas o comando de fechar o formulario.....


Agora no Evento do Formulario, Antes de Atualizar coloque:

Código:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If MsgBox("Deseja salvar as alterações?", vbYesNo + vbQuestion, "Atenção!") = vbNo Then
Me.Undo
MsgBox "Registro Não atualizado!!!", vbCritical, "Atenção"
Else
MsgBox "Registro Alterado com Sucesso!!!", vbInformation, "Atenção"
End If
End Sub

Olá Fábio!

Antes de você responder eu pesquisei no fórum e achei o seguinte código:


Botão salvar:

Me.Refresh

Botão Sair:

DoCmd.Close acForm, "NomeDoSeuForm"

Evento Após atualizar:

MsgBox "Salvo com sucesso !", vbInformation, "Confirmação"

Evento Antes de atualizar:

If MsgBox("Deseja salvar as alterações?", vbYesNo + vbQuestion, "Confirme!") = vbNo Then
Me.Undo
Else
End If

É exatamente o que eu queria,

De qualquer forma Obrigado pela força!

FabioPaes,

muito obrigado por compartilhar...

Sua contribuição já foi implementada!!rs..