Conditional Page Breaks -seperating records where text box can gro

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a database of what can be nearly 100 pages. It is made up mainly of
text boxes that are set to allow them to grow if there is sufficient data
entered. In their minimum size state its possible to get two records to an A3
sheet in landscape. In the worst case one record fills about 1½ sheets

I would like to be able to force a page break where a record overflows the
page but not to have one where it does not. has anyone got any easy coding
that they could offer please.

I did wonder if there was anyway of comparing the page number of both the
top and bottom of the record but couldn't work out the syntax

Many thanks
Richard
 
Richard said:
I have a database of what can be nearly 100 pages. It is made up mainly of
text boxes that are set to allow them to grow if there is sufficient data
entered. In their minimum size state its possible to get two records to an A3
sheet in landscape. In the worst case one record fills about 1½ sheets

I would like to be able to force a page break where a record overflows the
page but not to have one where it does not. has anyone got any easy coding
that they could offer please.


I don't understand what you want. Maybe it's just setting
the detail section's KeepTogether property to Yes??
 
Most of the time the details of a record will be sufficiently small for me to
get two sets printed to ne sheet of A3. sometimes the second record on the
page is sufficiently large to need to overflow onto a second page.
subsequently the record after this then starts about a ¼ of the way down the
page. In this instance I'd like to be able to put a page break in to make the
presentation neater

Richard
 
I don't think that is as good as using the KeepTogether
property, but let's try doing what you asked for.

Add a Page Break control named pgBreak to the bottom of the
detail section and add a line of code to the detail
section's Format event:

Me.pgBreak.Visible = (Me.Top < .5 * 1440)

Now a warning. When I tried this in A2003, something went
wrong and the report did not print its last page unless I
left a small amount of blank area below the page break
control. Unfortunately, leaving that blank space caused an
extra, blank page to be printed after the report's last
page.
 
Back
Top