When working with tables, you may not want the rows in the table to break across pages. In other words, you want everything in each row to be on the same page. This is easy enough to do manually—you just adjust the table properties in this manner:
Figure 1. The Row tab of the Table Properties dialog box.
Now each row will stay on its own page. The table will still break across pages, but individual rows in the table will not.
While this seems easy enough, it can be tiresome to go through this same process for lots of tables in a document. For example, if you've got 50 tables, then you'd have to go through the above steps 50 times. Argh!
The answer is to use a macro to change the Allow Row to Break Across Pages setting for all the tables. The following will do the trick:
Sub StopRowBreaking()
Dim tbl As Table
For Each tbl In ActiveDocument.Tables
tbl.Rows.AllowBreakAcrossPages = False
Next
End Sub
The macro works because it steps through each table and clears the setting (the AllowBreakAcrossPages property) for all the table's rows as a group. It is very quick, even if you have 50 or more tables in your document.
Note:
WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (13339) applies to Microsoft Word 2007, 2010, and 2013.
Create Custom Apps with VBA! Discover how to extend the capabilities of Office 2013 (Word, Excel, PowerPoint, Outlook, and Access) with VBA programming, using it for writing macros, automating Office applications, and creating custom applications. Check out Mastering VBA for Office 2013 today!
Want to add a border diagonally, through the middle of a table cell? It's easy if you follow the formatting steps ...
Discover MoreInserting a table is fast and easy in Word. You may want to make sure that the cells in the table are as square as ...
Discover MoreNeed to make sure that your smaller tables stay on a single page? Here's a handy trick you can use to enforce this rule.
Discover MoreFREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
2018-08-21 10:59:24
Maddy Scientist, Jr
Very useful. The only thing I would add is be sure to add "Set tbl = Nothing" at the end to release the object from memory. Like this:
Public Sub StopRowBreaking()
Dim tbl As Table
For Each tbl In ActiveDocument.Tables
tbl.Rows.AllowBreakAcrossPages = False
Next tbl
Set tbl = Nothing
End Sub ' StopRowBreaking
2014-12-20 23:25:28
Art Osgatharp
For more granular control, change ActiveDocument.Tables to Selection.Tables. Click and drag, or otherwise select, the part of the document containing the table or tables to process, then run the macro. The macro will process each table in the selection, leaving un-selected tables in the document unaffected.
Got a version of Word that uses the ribbon interface (Word 2007 or later)? This site is for you! If you use an earlier version of Word, visit our WordTips site focusing on the menu interface.
FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2019 Sharon Parq Associates, Inc.
Comments