[Resolvido]Reiniciar a contagem de registros por página

Boa tarde!!

Tenho um relatório em que preciso contar as linhas de cada página, reiniciando a cada nova página!! Contar os registros é tranquilo, porém o número continua a incrementar na página seguinte!!! Alguém tem alguma ideia de como resolver??

Certo de ser alvo da atenção de todos agradeço desde já

Att.:

Bruno lery

Olá Bruno,
Pode mostrar como está a numerar, é no relatório que tem o código.
Talvez possa reiniciar quando o número da página for diferente.
Abraço

Boa tarde Teixeira!

Alterei as propriedades! Segue em anexo uma "foto" do que fiz!

Att.:

Bruno Lery

Olá Bruno,

Com o código abaixo consegue o que pretende, veja:

Código:

Option Compare Database
'ahteixeira 2017 para MaximoAccess
Dim xContador As Integer
Private Sub SecçãoDeCabeçalhoDePágina_Format(Cancel As Integer, FormatCount As Integer)
    xContador = 0
End Sub
Private Sub Detalhe_Format(Cancel As Integer, FormatCount As Integer)
    xContador = xContador + 1
    Me.txtContador = xContador
End Sub

Apena funciona no modo Pré-visualizar.

Abraço

Bom dia Teixeira!

Obrigado plea dica!!!!!! Nota dez!!!!!! Vou testar agora!!!!!

Abraços

Bruno Lery

Olá Bruno Lery,
Ficamos aguardar.
Se resolver, não se esqueça de dar o retorno e marcar o tópico como resolvido.
Abraço

Boa tarde Teixeira!

Desculpe o iniciante mas onde exatamente insiro a rotina?

Att.:
Bruno Lery

Olá Bruno,
Baixe o exemplo da mensagem n. 4.
O código fica no reporte.
Nao se esqueça que só funciona no modo pre-visualizar.

Abraço

Boa tarde Teixeira!

Funcionou igual a um relógio Suíço!!!!!! Perfeito!!! Muito obrigado!!!! Espero poder retribuir um dia!!!!

Abração!!!!!!!!

Att.:
Bruno Lery

Abração!!!!!!!

Olá Bruno Lery,
Que bom que resolveu!
Obrigado pelo retorno, o fórum agradece.
Abraço