如何在 Excel 中为合并单元格设置交替行着色？

在大型数据集中，为交替行设置不同颜色有助于快速浏览数据。但当数据中包含合并单元格时，如何在 Excel 中实现如下方截图所示的交替行着色效果？

使用使用条件格式为合并设置交替行着色

使用 VBA 代码为合并设置交替行着色

---

使用使用条件格式为合并设置交替行着色

在 Excel 中，强大的使用条件格式功能可帮助您快速完成此任务，请按以下步骤操作：

1. 选择包含要交替着色的合并数据区域，然后单击开始 > 使用条件格式 > 新建规则，参见截图：

2. 在弹出的新建格式规则对话框中，请执行以下操作：

• 选择使用公式确定要设置格式的单元格选项，位于选择规则类型列表框中；
• 然后在为此公式为真时设置格式的值文本框中输入以下公式：=MOD(COUNTA($A$2:$A2),2)=0.
• 注意：A2 是您数据区域的起始单元格。

3. 然后，单击格式按钮，打开设置单元格格式对话框。在填充选项卡下，选择一种颜色以突出显示行，参见截图：

4. 单击确定> 确定 关闭对话框，此时已合并的行已填充为您指定的颜色，参见截图：

5. 继续单击开始 > 使用条件格式 > 新建规则，打开新建格式规则对话框，并执行以下操作：

• 选择使用公式确定要设置格式的单元格选项，位于选择规则类型列表框中；
• 然后在此处输入公式：=MOD(COUNTA($A$2:$A2),2)=1 到为此公式为真时设置格式的值文本框中。
• 然后，单击格式按钮，选择其他颜色即可突出显示这些行。
• 注意：A2 是您数据区域的首个单元格。

6. 然后，单击确定关闭对话框，此时您可以看到所选数据区域已根据合并内容以两种不同颜色交替着色，如下方截图所示：

---

使用 VBA 代码为合并设置交替行着色

除了常规的使用条件格式外，您还可以使用 VBA 代码轻松为合并应用交替行颜色。

1. 按住 ALT + F11 键，即可打开 Microsoft Visual Basic for Applications 窗口。

2. 然后，单击插入 > 模块，并将以下代码粘贴到模块窗口中。

VBA 代码：为合并设置交替行着色

Sub Kutools_AlternateColor()
'Update by ExtendOffice
Dim xRg As Range
Dim xCRg As Range
Dim xIRg As Range
Dim xC1, xC2 As Integer
Dim xR1 As Integer
Dim xCnt As Long
Dim xLColor, xDCR1, xDCR2 As Long
Set xRg = Application.InputBox("Please select the data range:", "KutoolsforExcel", "", Type:=8)
If TypeName(xRg) = "Nothing" Then Exit Sub
Set xCRg = Application.InputBox("Please select the column with the merged cells:", "KutoolsforExcel", "", Type:=8)
If TypeName(xCRg) = "Nothing" Then Exit Sub
Set xIRg = Intersect(xRg, xCRg)
If xIRg Is Nothing Then
MsgBox "the data range doesn't contain merged cells"
Exit Sub
End If
xC1 = xRg.Column
xC2 = xIRg.Column
xR1 = xRg.Row
xLColor = RGB(221, 235, 247)
xDCR1 = RGB(221, 235, 247)
xDCR2 = RGB(250, 232, 222)
xRw = 0
Do
xLColor = xDCR1 + xDCR2 - xLColor
xCnt = Cells(xRw + xR1, xC2).MergeArea.Rows.Count
Cells(xRw + xR1, xC1).Resize(xCnt, xRg.Columns.Count).Interior.Color = xLColor
xRw = xRw + xCnt
Loop While xRw < xRg.Rows.Count - 1
End Sub

3. 然后，按下 F5 键运行此代码。在第一个弹出框中，选择要使用的数据区域，参见截图：

4. 在第二个提示框中，选择包含合并内容的列，参见截图：

5. 然后，单击确定按钮，这些行将根据合并结果以交替方式着色，如下方截图所示：

---

视频：为合并设置交替行着色

---

更多相关文章：