[Resolvido]Formulario Inicia um novo código

Boa tarde! Pessoal,
Essa é minha primeira postagem no Grupo!
Venho pedi uma ajuda aos mestres.
Tenho um formulário de controle de leitos, fiz um código vba e inserir no Evento ao carregar:

If Me.Data_alta > 0 Then
       Me.Dias_internado = Me.Data_alta - Me.Data_admissao
       Else
       Me.Dias_internado = Date - Me.Data_admissao
       End If
       
If Me.Dias_internado <= 7 Then
Me.Mensagem = "PERMANÊNCIA IDEAL"
Me.Mensagem.ForeColor = vbBlack
Me.Mensagem.BackColor = vbGreen
End If
If Me.Dias_internado > 7 Then
Me.Mensagem = "PERMANÊNCIA ALERTA!"
Me.Mensagem.ForeColor = vbBlack
Me.Mensagem.BackColor = vbYellow
End If
If Me.Dias_internado > 10 Then
Me.Mensagem = "PERMANÊNCIA ULTRAPASSADA!"
Me.Mensagem.ForeColor = vbWhite
Me.Mensagem.BackColor = vbRed
End If

O problema é quando abro o formulário ele já inicia com um novo registo, tem alguma forma de corrigir?
Agradeço a atenção dos professores.

Boa tarde bem vindo ao fórum.
O formulario sempre vai abrir com o novo código porque ele está vinculado o código de numeração automática
No evento ao abrir  

Código:

DoCmd.GoToRecord , , acLast

Esse vai abrir com o ultimo registro

Esse com primeiro registro

Código:

DoCmd.GoToRecord , ,acFirst

Obrigado professor!
resolvido

Sucesso......  
Não esqueça de fechar o tópico.