Private Sub GroupHeader1_Print(Cancel As Integer, PrintCount As Integer)
??????????
End Sub

I need a function that counts the records.
And add something like this
If this is the first record then
Else (if this is the 2nd 3rd )
Force new page.

Thanks
Tom