[Resolvido]Numeração ID automática após exclusão de Registro

Boa tarde, estou precisando da ajuda do Forum...
tenho criado uma auto-numeração para cadastro, mas desejo que ao excluir o registro cadastrado, a numeração retorne a sequência, o que a auto-numeração do ACCESS não realiza; encontrei aqui no forum modelos de auto-numeração, mas sem a exclusão e continuação numérica: exemplo reg. 1,2,3,4,5, ao excluir o registro 3, desejo que a numeração não fique assim: 1,2,4,5 mas que realize a sequência, é possivel? grato.

1:   Private Sub Form_BeforeInsert(Cancel As Integer)
   
     If DCount("*", "tblContador") <= 1 Then
       Me.Código = 1
   
     Else
       Me.Código = DMax("Código", "tblContador") + 1
   
      End If
     
    End Sub
+++++++++++++++++++++++++++++++++++++++++++++

2:Private Sub btnSalvar_Click()
   'validar campo obrigatório
   If IsNull(Me.Nome) = True Then
       MsgBox "Insira Dados!", vbCritical, "Campo Obrigatório!"
       Me.Nome.SetFocus
       Cancel = True
       
       Exit Sub
   End If
   
   'salvar novo registro
   
   Dim rs As DAO.Recordset
   
       Call Autonumero
       
       Set rs = CurrentDb.OpenRecordset("autonumero", dbOpenDynaset, dbSeeChanges)
       
       With rs
           .AddNew
               !Código = Me.Código
               !Nome = Me.Nome
           .Update
           
   'inserir novo registro
   
   If MsgBox("Deseja Novo Registro?", vbQuestion + vbYesNo, "Dados Salvos Com Sucesso!") = vbYes Then
   
       'Call Form_Load
       Call Autonumero
       Me.Nome = Null
       Me.Nome.SetFocus
       
       Else
           DoCmd.Close acForm, Me.Name
   End If
           
       End With
   
End Sub

Ao excluir o 3, você quer que o 4 vire o 3, e o 5 vire o 4, ou que um novo registro ocupe use a numeração faltante?

Bom dia, mestre

correto, eu gostaria que a numeração não tivesse intervalo, como acontece nos codigos e na autonumeração Access. Ex.: 1,2,3,5,7, foi excluido o 4 e o 6, desejo que a numeração dos dados cadastrados sejam sequencial, independente do registro... volte a ser 1,2,3,4,5,6,7. Grato pelo apoio e aprendizado.

O banco de dados terá apenas um utilizador? Pois se houver outro utilizador e for programado para que após a exclusão de um registro todos os demais registros tenham que alterar seu ID para obedecer a uma determinada ordem, então o utilizador receberá uma mensagem de que outra pessoa alterou o registro que ele estava editando, e que, caso fosse da vontade dele, a edição que outra pessoa causou poderia ser descartada.

A ordem do identificador único de um registro em 99% dos casos é irrelevante. Se for para que saiam em ordem em um relatório, há outras maneiras de conseguir isso. Qual seria a utilidade no seu caso?

Mestre, neste caso seria utilizar no formulário, mas eu descobri uma forma no campo calculado que vai ajudar sem o VBA, assim que eu concluir o modelo vou disponibilizar no repositório. Grato pelas orientações e dedicação. Muito obrigado.