在Excel中，可以使用条件格式对数据表的每隔一行（或第n行）进行着色。您可能想在Word中完成相同的任务，该程序提供了几种可以采用的方法。

一种方法是在表上使用Word的自动套用格式功能。请按照下列步骤操作：

。照常创建表。

。将插入点放在表中的某处。

。从表格菜单中选择表格自动套用格式选项。 Word将显示“表自动套用格式”对话框。 （请参见图1。）

。在可用样式列表中，选择一种在表行上使用底纹的样式。

。单击应用。该格式将应用于表。

。关闭表格自动套用格式对话框。

为表提供的许多自动套用格式都是“智能”的，这意味着即使您向表中添加新行，它们也可以调整行底纹。怎么做？很高兴你问；这导致为表格行加阴影的第二种方法-表格样式。

多年来，Word中已经提供样式。 Word样式功能的最新添加之一是表格样式。您可以定义一个表格样式，该样式将阴影自动应用于表格的偶数或奇数行。 （这是表格自动套用格式的方法。）请按照下列步骤操作：

。从格式菜单中选择样式和格式。 Word将显示“样式和格式”任务窗格。

。在任务窗格中，单击“新建样式”。 Word将显示“新样式”对话框。

。使用样式类型下拉列表，选择表格。 （请参见图2。）

。使用“将格式应用于”下拉列表，选择“奇数行条纹”或“偶数行条纹”，具体取决于您是否希望将此样式应用于奇数行或偶数行。

。使用对话框中的控件来设置要应用于行的格式。

。根据需要设置样式名称和其他属性。

。单击确定。

现在，您已经为奇数或偶数行创建了阴影样式。您可以根据需要将此样式应用于表格。更改表格中的行数时，格式会自动调整。

如果您想将格式应用于表中的每个其他行，并且您使用的是支持表格式的Word版本，那么到目前为止介绍的解决方案非常有用。如果您希望将格式应用于第三，第四或第五行，或者您使用的是不包含表格格式的旧版Word，那么它们的效果就不太好。在这些情况下，最好使用宏进行格式化。下面是一个宏的好例子，该宏可以将阴影应用于表中的每第三行：

Sub ShadeRows()

Dim iRow As Integer     Dim iHeads As Integer     Dim iRowTtl As Integer

If Selection.Information(wdWithInTable) = True Then         iHeads = InputBox(prompt:="Number of heading rows?", _           Title:="Headings", Default:="1")



iRowTtl = Selection.Tables(1).Rows.Count - iHeads         For iRow = 1 To iRowTtl             If iRow Mod 3 = 0 Then                 Selection.Tables(1).Rows(iRow + iHeads).Shading.Texture _                   = wdTexture20Percent             Else                 Selection.Tables(1).Rows(iRow + iHeads).Shading.Texture _                   = wdTextureNone             End If         Next iRow     End If End Sub

宏询问表中有多少标题行，然后调整对其应用底纹的行。如果运行宏时插入点不在表中，则不会发生任何事情。您还可以通过更改Mod公式来更改阴影的频率（例如，从每三行到每四行一次）。只需以这种方式更改单行：

If iRow Mod 4 = 0 Then

您也可以通过将wdTexture20Percent常量更改为另一个常量来更改阴影量，例如wdTexture5Percent，wdTexture10Percent，wdTexture25Percent等。

您还应该了解，如果在垂直合并了单元格的表上运行宏，则可能会得到意外的结果（如果有）。如果更改表中的行数，则需要再次运行宏以重新应用阴影。

注意：

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

点击此处在新的浏览器标签中打开该特殊页面。

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

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（5814）适用于Microsoft Word 97、2000、2002和2003。您可以在Word（Word 2007）的功能区界面中找到此技巧的版本。和更高版本）在这里：

Shading Table Rows。