Try this

Expression for the page numbering...

="Page " & Code.GetPN(Not(ReportItems!tag.value Is Nothing),Globals!PageNumber)

Code for the page numbering...

Shared offset as integer

Public Function GetPN(reset As Boolean,pagenumber As Integer) as Integer

If reset

offset = pagenumber - 1

End If

Return pagenumber - offset

End Function