Numeração automática dora da ordem

[Ipalha]

Senhores,

O meu banco de dados compartilhado .accdb registra corretamente cada novo registro com a numeração automática (chave primária), porém, as vezes mostra os registros fora da ordem no meu formulário.

Por exemplo. O meu banco tem 3100 registros, mas quando clico no botão "ir para o registro anterior", ele não volta no 3099, mas no 3059, 3058, 3057 e depois aparece o 3099. Novos registros, por exemplo, o 3100 é acrescentado depois do 3099.

Alguma dica?

[LeoRz]

Não faça um botão simples de navegação. Escreva um código:

Private Sub btnProximo_Click()

On Error GoTo btnProximo_Click_Err

DoCmd.GoToRecord acForm, "Frm_seuformulario", acNext

btnProximo_Click_Exit:

Exit Sub

Mas, para certificar que esta atualizada, que tal inserir antes um REFRESH?

Ficaria assim o código do botão:

Private Sub btnProximo_Click()

On Error GoTo btnProximo_Click_Err

Forms![Frm_seu formulario].Refresh

DoCmd.GoToRecord acForm, "Frm_seuformulario", acNext

btnProximo_Click_Exit:

Exit Sub

btnProximo_Click_Err:

MsgBox Error$

Resume btnProximo_Click_Exit

End Sub

Pode ver mais detalhes aqui: https://msdn.microsoft.com/pt-br/library/office/ff836021.aspx

Outra solução seria incluir um update Query no código (supondo que este formulario vem de uma query)

Edited April 17, 2015 by LeoRz

[Ipalha]

Valeu amigão

Funcionou perfeitamente.

[fabiosk2012]

O meu  estava do mesmo jeito, o problema era na verdade na tabela que do nada ficou sem chave primária, foi só corrigir isso e meu formulário voltou a funcionar.😀