Contar registros e não suas incidências em Relatórios...

Caros, tenho um relatório em que aparecem 10 pagamentos feitos por 7 clientes. Quando uso a função CONTAR ela me retorna 10! Qual a função que devo utilizar para que retorne os 7 clientes?
Agradeço desde já!

Olá! Tente criar um Recordset no "Ao carregar" do relatório utilizando o DISTINCT para pegar apenas um de cada nome:

Dim rs As Recordset
Set rs = "SELECT DINSTINCT NomeDoCampo FROM NomeDaTabela"

Me.NomeDoCampo = rs.RecordCount

rs.Close
Set rs = Nothing

A Fonte de Regsitro do relatório é uma consulta.
E como eu uso este VBA no rodapé do relatório?

Quando passamos o caminho das pedras, é para ser adaptado de acordo as necessidades. Nesse caso, seria só colocar o nome da consulta aonde está NomeDaTabela.

Observe que já tem o NomeDoCampo no código. Basta ter o campo no rodapé.

Private Sub Report_Load()
Dim rs As Recordset
Set rs = "SELECT DINSTINCT nome FROM ConDoacoesPorSocioParaRelD"

Me.Nome = rs.RecordCount

rs.Close
Set rs = Nothing
End Sub

Deu a seguinte mensagem: Erro de Compilação. Tipo incompatíveis

O que pode ser, criquio?

Tem um erro no DINSTINCT. Tente assim:

Código:

Dim rs As Recordset
Set rs = "SELECT DISTINCT nome FROM ConDoacoesPorSocioParaRelD"

Do While Not rs.EOF
rs.MoveNext
Loop

Me.Nome = rs.RecordCount

rs.Close
Set rs = Nothing

Criquio, ao compilar deu erro na segunda linha. Como antes. Mesmo com a correção do Distinct.

Verifique se o nome da consulta está correto, bem como o nome do campo na consulta e o nome do campo no relatório.

Olá amigos!

Acredito que o seu relatório esteja agrupado por clientes. Bastaria então usar na seção do cabeçalho do grupo um j= j+ 1 e no rodapé do relatório o campo me!totalClientes = j.

Sucesso!

Prezados, tenho um formulário com diversos campos de preenchimento e gostaria que fosse gerado relatórios específicos de algum dos itens cadastrados (anexo imagem do form) Ex: Gerar relatório dos cadastros com campos marcados nos itens "Ativo", ou "Encerrado".
Desde já agradeço qualquer ajuda.

Criquio, sem solução! O nome do campo e da consulta estão corretos mas continua o problema na compilação.
Avelino, entendi mas nao sei onde colocar estes algoritmos. Em uma caixa de texto de cada seção? Ou você deu o raciocínio para criar uma função?
Obrigado a ambos!!