Remettre un numéro de page à zéro en cas de saut de page dans un groupe

Comment faire ?

1. Vérifier qu'une 'textbox' (d'une table par exemple) contient une expression pour un groupe

2. Ajouter le code suivant au rapport :

Shared offset as Integer
Shared currentgroup as Object
Public Function GetGroupPageNumber(group as Object, pagenumber as Integer) as Object
If Not (group = currentgroup)
offset = pagenumber - 1
currentgroup = group
End If
Return pagenumber - offset
End Function

3. Ajouter dans l'en-tête/pied de page, une 'textbox' avec la code suivant :

=Code.GetGroupPageNumber(ReportItem("textbox#").Value,Globals!PageNumber)

 Source : http://blogs.msdn.com/b/chrishays/archive/2006/01/05/resetpagenumberongroup.aspx