I have this in the main report footer . . .

Code:
Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer)
Cancel = (Me.Pages - 1)
End Sub
Works perfectly.

It deletes the page header of the last page of the main report detail section but not the page number. [="Page " & [Page] & " of " & [Pages] & " " & "cbESC"]

What I really would like it to do is DELETE entirely, skip or do not print the blank page from the report.

This is the last page showing one or more detail records of the main report, BEFORE a page break and the subReport prints on the last page of the report.

The subReport never uses more than a single page.

Any suggestions on how to DELETE entirely, skip or do not print this page and its would-be page number and print the subReport with the correct page number?

Thanks much . . . Rick