Boas, Coloquei a dúvida aqui, mas não sei se esta certo ou é em Consultas.
Tenho um form que existe um botão para arquivar o registro em outra tabela e excluir o mesmo na tabela atual, pelas linhas abaixo:
Funciona certinho, mas fecha o form atual e volta para um form aberto anterior, uma vez que tem o comando DoCmd.Close.
Caso eu retire esse comando o form fica aberto mas com o registro atual com os campos com a expressão Excluido, e ai não sai disso,
gostaria que voltasse como se abrisse o form novamente com o primeiro registro da tabela, mas não consigo, pois o form tem uns procedimentos no evento No atual e dá erro em modo de execução.
Preciso de ajuda para contornar isso. Obrigado.
Tenho um form que existe um botão para arquivar o registro em outra tabela e excluir o mesmo na tabela atual, pelas linhas abaixo:
- Código:
Dim stDocName As String
stDocName = "F1a"
DoCmd.OpenQuery stDocName, acNormal, acEdit
stDocName = "F2e"
DoCmd.OpenQuery stDocName, acNormal, acEdit
DoCmd.Close
MsgBox "Arquivado Com Sucesso!", vbExclamation, ""
DoCmd.SetWarnings True ' Habilita Avisos
Funciona certinho, mas fecha o form atual e volta para um form aberto anterior, uma vez que tem o comando DoCmd.Close.
Caso eu retire esse comando o form fica aberto mas com o registro atual com os campos com a expressão Excluido, e ai não sai disso,
gostaria que voltasse como se abrisse o form novamente com o primeiro registro da tabela, mas não consigo, pois o form tem uns procedimentos no evento No atual e dá erro em modo de execução.
Preciso de ajuda para contornar isso. Obrigado.