Numeração Automática - Consulta

Pessoal,

Estou precisando muita da ajuda de vcs, não sei se no forum ja existe este topíco pois não consegui achar.

Criar uma consulta através de uma tabela e que na consulta ele possar criar uma numeração automatica.

Sera que poderia me ajudar.

Ficarei no aguardo

Olá

A consulta é base para um relatório?
Se for, insira um campo não acoplado na seção Detalhe do relatório, e defina as seguintes propriedades:

Fonte do Controle =1
Soma parcial Total

Boa Tarde....

1º - Crie um Módulo (Numerar sequencial) e Cole

' inicio
' Cortesia Juan M. Afán de Ribera
Public Function numerarSQL(nDato) As Long
Static nORDEN As Integer

If IsNull(nDato) Then
nORDEN = 0
Exit Function
End If
nORDEN = nORDEN + 1
numerarSQL = nORDEN
End Function

' final

2º- Criar consulta e abra no modo SQL e cole este Select e altere o nome de (NomeSuaTabela) e tambem o IDdeSuaTabela ou Campo que sirva para numerar.

SELECT numerarSQL([IDdeSuaTabela]) AS ID, * FROM NomeSuaTabela
UNION ALL SELECT numerarSQL(Null), * FROM NomeSuaTabela WHERE 1=0;


Espero que ajude

Abraços

Ja foi debatido isto aqui no fórum a um tempo, Vejam la as mensagens pois foram muito produtivas a meu ver...

https://www.maximoaccess.com/t10427-resolvidocodigo-ou-funcao-para-enumerar-registros-de-uma-consulta-ou-relatorio

Leiam todas.