Note
Access to this page requires authorization. You can try signing in or changing directories.
Access to this page requires authorization. You can try changing directories.
AllowBreakAcrossPages Property
This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.
True if the text in a table row or rows are allowed to split across a page break. Can be True, False or wdUndefined (only some of the specified text is allowed to split). Read/write Long.
expression.AllowBreakAcrossPages
expression Required. An expression that returns a TableStyle object.
Example
This example creates a new document with a 5x5 table and prevents the third row of the table from being split during pagination.
Dim docNew As Document
Dim tableNew As Table
Set docNew = Documents.Add
Set tableNew = docNew.Tables.Add(Range:=Selection.Range, _
NumRows:=5, NumColumns:=5)
tableNew.Rows(3).AllowBreakAcrossPages = False
This example determines whether the rows in the current table can be split across pages. If the insertion point isn't in a table, a message box is displayed.
Dim lngAllowBreak as Long
Selection.Collapse Direction:=wdCollapseStart
If Selection.Tables.Count = 0 Then
MsgBox "The insertion point is not in a table."
Else
lngAllowBreak = Selection.Rows.AllowBreakAcrossPages
End If