Report Will Continue Message

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

DT - 20 Oct 2005 18:07 GMT

I want to insert a "Continued on Next Page" message when there is more than
one page to a report. I'm using the following code and it isn't working.
Any suggestions?

Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As
Integer)

If Me.Section("PageHeaderSection").WillContinue = True Then
Me.pgcont.Visible = True
Else: Me.pgcont.Visible = False
End If

End Sub

Reply to this Message

Marshall Barton - 20 Oct 2005 19:58 GMT

>I want to insert a "Continued on Next Page" message when there is more than
>one page to a report. I'm using the following code and it isn't working.
[quoted text clipped - 9 lines]
>
>End Sub

You are misinterpreting the meaning of the WillContinue
property. It only tells you if the section itself will
spill ove to the next page and the Page header/footer
sections will never do that.

If you only want to display teh continue message on all but
the last page of the report, then, first make sure you have
a text box that uses the Pages property (e.g.
="Page " & Page & " of " & Pages). Then the code you're
looking for would be:

    Me.pgcont.Visible = (Me.Page < Me.Pages)

Signature

Marsh
MVP [MS Access]

Reply to this Message

DT - 20 Oct 2005 20:20 GMT

This is exactly what I needed...thank you!

> >I want to insert a "Continued on Next Page" message when there is more than
> >one page to a report. I'm using the following code and it isn't working.
[quoted text clipped - 23 lines]
> Me.pgcont.Visible = (Me.Page < Me.Pages)
>

Reply to this Message