Yo lo que haría sería irme a código del informe
declara una variable para el contador:
Dim x As Integer
crea un campo independiente en el informe que se llame, por ejemplo, 'contador'
y en la sección de detalle pon:
Private Sub Detalle_Format(Cancel As Integer, FormatCount As Integer)
x = x + 1
contador= Int(x)
End Sub
Esto funciona, no sé si es chapucero pero no se me ocurre otra manera.
Un saludo,
