ForceNewPage Property [Access 2003 VBA Language Reference]
You can use the ForceNewPage property to specify whether form sections detail, footer) or report sections (header, detail, footer) print on a separate page, rather than on the current page. Read/write Byte.
expression.ForceNewPage
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
For example, you may have designed the last page of a report as an order form. If the report footer's ForceNewPage property is set to Before Section, the order form is always printed on a new page.
Note The ForceNewPage property does not apply to page headers or page footers.
The ForceNewPage property uses the following settings.
Setting | Visual Basic | Description |
---|---|---|
None | 0 | (Default) The current section (the section for which you're setting the property) is printed on the current page. |
Before Section | 1 | The current section is printed at the top of a new page. |
After Section | 2 | The section immediately following the current section is printed at the top of a new page. |
Before & After | 3 | The current section is printed at the top of a new page, and the next section is printed at the top of a new page. |
Note You can set this property by using the section's property sheet , a macro , or Visual Basic .
Here are some examples of the ForceNewPage property setting.
Section | Sample setting | Description |
---|---|---|
A group header displaying the year | Before Section | The group header is printed at the top of the page, followed by the detail section, group footer, and page footer. |
A report detail section | After Section | The group footer is printed at the top of a new page. |
A report header containing the report title and company logo. | After Section | The report title and logo are printed on a separate page at the beginning of the report. |
Example
The following example returns the ForceNewPage property setting for the detail section of the Sales By Date report and assigns it to the intGetVal
variable.
Dim intGetVal As Integer
intGetVal = Reports![Sales By Year].Section(acDetail).ForceNewPage
Applies to | Section Object
See Also | Format Property | NewRowOrCol Property