retornar ultimo id da coluna do banco de dados na textbox automaticnete ao abrir o formulario

[Fabio moraes]

boa tarde, sou novo por aqui e tambem no vbaexcel

estou com uma duvida

estou tentando fazer que ao inicializar o userform  uma textbox exiba o ultimo id de uma coluna do meu banco de dados access

porem sem sucesso, sempre só exibe o numero 1 alguém consegue me dar uma luz??

segue meu codigo

--------------------------------------

ConexaoBD

SQL = "SELECT top 1 * from TB_CATEGORIA WHERE CODIGO"
Rs.CursorType = adOpenKeyset
Rs.Open SQL, db
'Rs.MoveLast
ULTIMOREG = Rs.AbsolutePosition

id_pedido = ULTIMOREG

fechaRS

---------------------------------------------------------------------------

[Marlin Cuvalis]

Seu código apresenta alguns problemas que podem estar causando o comportamento indesejado. Aqui estão algumas correções e melhorias:

Problemas no código:

1. Consulta SQL mal formulada

   • Sua consulta SQL = "SELECT top 1 * from TB_CATEGORIA WHERE CODIGO" está incompleta. Para obter o maior ID, você deve usar ORDER BY CODIGO DESC.

2. Forma correta de obter o último ID

   • A melhor forma de obter o último ID (o maior) é ordenar em ordem decrescente e pegar o primeiro registro.

3. Uso correto do Recordset

   • O AbsolutePosition não é a melhor forma de obter o último registro. Você deve pegar o valor diretamente do campo. Connections Game