[Resolvido]Não salvar dados do formulário principal ao clicar no subformulario

Ola, gostaria de saber como faço para não salvar os dados do form principal quando clico
no subform, pois quero criar um botão fechar que não salve essas alterações.

Estou utilizando

Private Sub Comando113_Click()
Me.Undo
DoCmd.Close
End Sub

para fechar meus formulários sem salvar nada, e gostaria de fazer o mesmo com esse
mas não esta funcionando porque como disse ao clicar no subform ele já salva os dados do form principal.
Eu já entendi que quando clico no subform ele entende como se eu tivesse fechado o form principal, mas
não estou conseguindo resolver.

Boa tarde Glaucon, você gostaria de não salvar o registro do fomulário principal e manter o do subformulário ou não salvaria em nem um dos dois ?

Ola, desde já agradeço pela atenção. Quero salvar todos os dados, mas só quando clico em um botão OK (Isso já funciona).
Ou descartar todos os dados, sem mensagem de salvar ou não, quando clico em um botão fechar.

Me.Undo - resolveu meu problema com os formulários simples, ele limpa os campos e fecha, mas com um formulário e subformulário
não funciona pois quando clico no subformulário os dados do formulário principal já são salvos automaticamente. Mesmo que funcionasse ele não
funciona no subformulário também.

bom dia Glaucon, quando você altera do formulário para o subformulário o registro do formulário sera salvo. então te aconselho a criar uma "consulta exclusão" para excluir o registro atual e executá-la no evento do botão.

Ola Bigfill, aprendi a fazer a consulta para excluir, mas não consigo especificar os critérios.
Ao pesquisar como fazer essas exclusões encontrei esse código que funcionou do jeito que eu
queria, ele não salva os dados do formulário principal quando fecho, mesmo clicando no
subformulário, mas ele da erro ao excluir o formulário em branco.

Private Sub Comando113_Click()
If MsgBox("Anular Todo Documento ? ", vbYesNo + vbQuestion, "Aviso") = vbYes Then
DoCmd.SetWarnings False
DoCmd.RunCommand acCmdDeleteRecord -------------------------------- essa linha não exclui o form em branco, tem alguma dica.
DoCmd.Close acForm, "Vendas"
DoCmd.SetWarnings True
Else
End If
End Sub

Boa tarde Glaucon, coloque um critério de (If) no código.


Private Sub Comando113_Click()
If IsNull(Me.UmCampoDoFormulario) Then
Else
If MsgBox("Anular Todo Documento ? ", vbYesNo + vbQuestion, "Aviso") = vbYes Then
DoCmd.SetWarnings False
DoCmd.RunCommand acCmdDeleteRecord -------------------------------- essa linha não exclui o form em branco, tem alguma dica.
DoCmd.Close acForm, "Vendas"
DoCmd.SetWarnings True
Else
End If
End If
End Sub

Ola amigo:D
Obrigado pela ajuda funcionou corretamente.

Obrigado pelo retorno, o fórum agradece.