[Resolvido]Manter formulário ativo

Eu acho que a solução deve ser bem simples, mas não lembro mais muito coisa do Access, pois passei muito tempo sem usar.
Em um formulário ao inserir um valor no primeiro campo, é executado um procedimento para preenchimento de outro campo (auto numeração obedecendo outros parâmetros) no Form, desta forma:

DoCmd.OpenQuery ("Consulta"), acViewNormal, acEdit
Lotes = acEdit
DoCmd.Close
Forms(frmCurrentForm).AllowFormView = True

If Lotes < 1 Then
Me.NLOTE = 1
Else
Me.NLOTE = Lotes + 1
End If

Ocorre que o formulário não permanece ativo. Para digitar outros campos tenho que reativá-lo com o mouse.

Help!

Olá, boa tarde e seja bem vindo ao nosso Fórum Haroldo!
Para ativar um formulário aberto, use isso:

DoCmd.SelectObject acForm, "NomeFormulario"

Muito obrigado, Marcelo David. Funcionou bem como esperado.

Grato pelo retorno!