[Resolvido]Colocação top 10

Fiz uma consulta onde 'rankeia' os 10 produtos que tiveram maior quantidade de respostas em uma pesquisa.
O que preciso é fazer uma colocação, por exemplo
Com vem os produtos:
Produto
Produto
Produto
Como gostaria de fazer:
1 Produto
2 Produto
3 Produto
Existe alguma função que possa fazer esse rank? Obrigado.

Tem como postar a consulta?

PAra o teste importei a consulta para outro banco como tabela. Os produtos dessa consulta variam de acordo com o mês.

Não adiantou muito, melhor seria a tabela junto com a consulta.
A tabela que gera essa consulta, tem chave primária?

No campo colocação é justamente onde preciso colocar os numeros de 1 até 10, a chave primária será o mês ano e a colocação do produto.

Public Function numerar(nData) As Long
Static nORDEM As Integer

If IsNull(nData) Then
nORDEM = 0
Exit Function
End If

nORDEM = nORDEM + 1
numerar = nORDEM

End Function

Achei essa função em outro site, mas ela gera numeros infinitos, consegue adaptar para ir de 1 até 10?

Sei que é para numerar, mas não entendi como funciona esse código (o que seria nData?).

Tenho uma função semelhante, mas preciso saber se a tabela que gera a consulta top 10 tem chave primária e se pode ser incluída nessa consulta top 10.

Não tem chave primária. Mande esse semelhante que você tem para que testar aqui.

Sem chave primária, não adianta.

Código:

Public Function Ranking(QueryName As String, FieldName As String, FieldValue As Variant) As Long

    Set rs = CurrentDb.OpenRecordset(QueryName, dbOpenSnapshot)
    NumReg = 1
    rs.MoveFirst
    Do While FieldValue <> rs(FieldName)
        NumReg = NumReg + 1
        rs.MoveNext
    Loop
    Set rs = Nothing

End Function

Não funcionou.

Pessoal,

A solução que encontrei foi a seguinte:

- Create table com o campo numero - auto increment e marca char
- Faço um acrescimo das marcas que estao na consulta para essa tabela criada numerando os dados de 1 até 10 pelo auto incremente.
- Vinculei a tabela a consulta tendo os dados de colocação.
- Jogo a consulta como tabela em outro banco de dados.
- Deleto a tabela criada para fazer o processo novamente da próxima vez.

Agradeço a ajuda e fica a dica para quem precisar.