[Resolvido]Função Para Substituir Campo Autonumeração em Consulta Adição via Recordset

Olá a todos.

Quero utilizar o SQL de uma consulta adição via DAO.Recorset. Tenho um empecilho. O campo índice da tabela que receberá os dados não é mais Autonumeração. Para criar um novo código único, utilizo a função Nz(DMax("CodMovimento", "tblMovimento"), 0) + 1.

O SQL é o seguinte:
strSQL = "INSERT INTO tblMovimento (CodEmpregador) SELECT CodEmpregador FROM tblEmpregador WHERE Ativa = True"

É possível acrescentar a função acima deste deste SQL?

Creio que se voce souber a quantidade de linhas a atualizar podes utilizar um procedimento com o For... e acada loop incrementar o numero e ir atualizando linha a linha... Assim a cada loop o numero seria incrementado em +1 e iria atualizando..


Cumprimentos.

Ok. Fiz algo parecido.
Vou dar por resolvido.

Valeu.

O Fórum agradece o retorno.