使用表时,您可能不希望表中的行跨页中断。换句话说,您希望每一行中的所有内容都在同一页上。这很容易手动完成—您只需以这种方式调整表属性:

。选择您想要影响的行。

。显示功能区的“布局”选项卡。

。单击表格组中的属性工具。 Word将显示“表属性”对话框。

。确保选择“行”选项卡。 (请参见图1。)

。清除“允许行跨页中断”选项。

。单击确定。

现在,每一行将保留在自己的页面上。该表仍将跨页中断,但表中的各个行不会中断。

尽管这似乎很容易,但是要对文档中的许多表执行相同的过程可能会很累。例如,如果您有50个表,那么您将不得不执行上述步骤50次。啊!

答案是使用宏更改所有表的“允许行跨越页面”设置。以下将达到目的:

Sub StopRowBreaking()

Dim tbl As Table     For Each tbl In ActiveDocument.Tables         tbl.Rows.AllowBreakAcrossPages = False     Next End Sub

宏之所以起作用,是因为它逐步遍历每个表并清除所有表行的设置(AllowBreakAcrossPages属性)。即使您的文档中有50个或更多的表,它也非常快。

注意:

如果您想知道如何使用此页面(或_WordTips_网站上的任何其他页面)中描述的宏,我准备了一个包含有用信息的特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(13339)适用于Microsoft Word 2007、2010、2013、2016、2019和Office 365中的Word。