[Resolvido]Após salvar desaparece o registro

Pessoal, inseri um botão no frmDados para salvar a inclusão de um registro, conforme os comandos a seguir:

Private Sub btn_Salvar_Click()
Me.Requery
Form_frmPesquisa.Requery
Form_frmPesquisa.Recalc
End Sub

Após atualizar do frmDados
Form_frmDados.Refresh
MsgBox "As alterações foram salvas com sucesso.", vbInformation, "Aviso"
End Sub

Ocorre que após clicar no botão Salvar, os dados dos formulários desaparecem e ficam em branco, tendo eles ficado registrado no frmPesquisa.
No caso em que sao abertos vários registros, após salvar um deles, o frmDados volta a exibir os dados do primeiro registro aberto.
Mas quando é somente uma alteração, após salvar, os dados permanecem no registro atual.

Você está iquivocado quando ao salvar, o Me.requery apenas atualiza e envia para o primeiro registo.

Se você testar assim, acredito que vai funfar;

Código:

Private Sub btn_Salvar_Click()
  DoCmd.RunCommand acCmdSaveRecord
  Me.Recalc
  Forms!Form_frmPesquisa.Recalc
End Sub


Aparece uma mensagem dizendo que não pode localizar o objeto referenciado Form_frmPesquisa

fiz uma mudança com segue abaixo e deu certo.

DoCmd.RunCommand acCmdSaveRecord
Me.Recalc
Form_frmPesquisa.Recalc

Obrigado pela ajuda JPaulo