如何在 Excel 中快速为交替的筛选行着色？

为了提高可读性，有些人可能会在 Excel 中为每隔一行应用阴影颜色。条件格式可以帮助您快速解决此问题。有关更多详细信息，请访问： 如何在 Excel 中为交替行着色？

但是，如果您需要在 Excel 中为交替的筛选行着色，则可以按照以下步骤快速为筛选后的行应用阴影颜色：

使用条件格式为交替的筛选行着色
太复杂了！

使用 VBA 代码为交替的筛选行着色
适用于高级用户！

使用 Kutools for Excel 快速为交替的筛选行着色
简单，适合所有用户！

使用条件格式为交替的筛选行着色

通过这种方式，您应该分两个主要步骤完成：

A：交替为区域着色（步骤1-步骤5）

B：筛选所需的数据，阴影将自动更改（步骤6-步骤9）

1. 选择要着色的区域。如果已经应用了筛选，请务必移除筛选以选择整个区域。在此示例中，我们将选择区域 (A2:G25)。

2. 然后点击 开始 > 条件格式 > 新建规则，将弹出一个 新建格式规则 对话框。

3. 点击“选择规则类型”中的最后一个选项“使用公式确定要设置格式的单元格”，并在框中输入此公式“=MOD(SUBTOTAL(3,$A$1:$A2),2)”。

4. 然后点击 格式 按钮，将弹出一个 设置单元格格式 对话框。点击 填充，并选择您喜欢的颜色。参见截图：

5. 点击 确定，它将返回到 新建格式规则，现在您可以在 预览 框中看到颜色。然后点击 确定。您选择的区域已交替着色。

6. 完成上述步骤后，现在您需要筛选日期。点击 数据 > 筛选，Excel 将在列标题上添加下拉箭头。

7. 然后您可以选择所需的条件。在此示例中，我将筛选客户名称为 Minimall 的记录。将光标放在 客户 下拉箭头上并点击它，将出现一个菜单，选择 文本筛选 > 包含… 参见截图：

8. 将弹出一个 客户自动筛选 对话框。在包含框中输入 Minimall。

9. 然后点击 确定。所有筛选后的行都已交替着色。参见截图：

使用 VBA 代码为交替的筛选行着色

第一种方法有些复杂，以下 VBA 代码可以帮助您快速为筛选后的行交替着色。

假设您已经筛选了数据，参见截图：

1. 点击 开发工具 >Visual Basic，将显示一个新的 Microsoft Visual Basic for Applications 窗口，点击 插入 > 模块，并在模块中输入以下代码：

VBA：交替为筛选行着色

Sub ShadeRows()
'Updateby20140529
Dim Rng As Range
Dim WorkRng As Range
Dim shadeIt As Boolean
shadeIt = True
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng.Rows
    If Not Rng.EntireRow.Hidden Then
        Rng.Interior.ColorIndex = _
        IIf(shadeIt, 15, xlNone)
        shadeIt = Not (shadeIt)
    End If
Next
End Sub

2. 点击 按钮执行代码，一个 KutoolsforExcel 对话框弹出，供您选择要着色的区域。参见截图：

3. 然后点击 确定。筛选后的数据已交替着色。参见截图：

使用 Kutools for Excel 快速为交替的筛选行着色

Kutools for Excel ：拥有 300 多个便捷的 Excel 加载项，免费试用 30 天无限制。 立即获取 。

使用 Kutools for Excel，您可以轻松快速地为交替的筛选行着色。您可以按照以下步骤完成操作：

1. 选择要着色的筛选数据。

2. 点击 Kutools > 格式 > 交替行着色。

3. 然后在 “交替行/列着色” 对话框的“着色类型” 中勾选行选项，并在“着色颜色”下拉列表中选择一种您喜欢的颜色，最后从 “颜色模式”中勾选条件格式，并在“间隔行数”微调按钮中选择数字 1。参见截图：

4. 然后点击 确定。筛选后的数据已交替着色。参见截图：