在 Excel 中筛选数据——简单且全面

Excel 的筛选命令可以帮助你在区域或表格中筛选数据，仅显示你需要的数据，其余数据将被隐藏。你可以利用其内置的操作符，轻松筛选数字、文本或日期，例如筛选大于等于某个数值的所有数字、筛选以特定字符或单词开头、结尾或包含特定内容的文本，或仅显示截止日期早于或晚于某日期的行等。当你在区域或表格中筛选数据后，如果数据发生变化，可以重新应用筛选以获取最新数据，或清除筛选以显示全部数据。

本教程将演示如何在 Excel 中添加、使用或移除筛选。此外，我们还会指导你如何增强筛选功能，以应对更复杂的 Excel 问题。

1. 如何在 Excel 中添加筛选

要在区域或表格中筛选数据，首先需要为数据添加筛选。本节将介绍三种在 Excel 中添加筛选的方法。

1.1 “数据”选项卡上的筛选命令

选择你想要添加筛选的区域或表格中的任意单元格，点击“数据”>“筛选”。

1.2 “开始”选项卡上的筛选命令

选择你想要添加筛选的区域或表格中的任意单元格，点击“开始”>“排序和筛选”>“筛选”。

1.3 使用快捷键添加筛选

选择你想要添加筛选的区域或表格中的任意单元格，然后按下“Ctrl”+“Shift”+“L”组合键。

完成上述任一操作后，你会发现所选单元格的列标题处出现了下拉箭头。

2. 如何在 Excel 中应用筛选（单条件或多条件）

添加筛选后，需要手动应用筛选。本节将演示如何在 Excel 中对一列或多列应用筛选。

2.1 对单列应用筛选（单条件）

如果你只想对一列应用筛选，比如对 C 列的数据进行筛选，如下图所示。请定位到该列，然后按以下步骤操作。

1. 1）点击该列标题中的下拉箭头。
2. 2）根据需要指定筛选条件。
3. 3）点击“确定”按钮开始筛选。见下图：
   

现在筛选已应用于 C 列。所有符合筛选条件的数据将显示，其余数据将被隐藏。

应用筛选后，你会发现下拉箭头变成了筛选图标 .

很贴心的是，当你将鼠标悬停在筛选图标上时，你设置的筛选条件会以屏幕提示的形式显示，如下图所示。因此，如果你忘记了设置的筛选条件，只需将鼠标悬停在筛选图标上即可查看。

2.2 对多列应用多条件筛选（多条件）

2.2.1逐列对多列应用多条件筛选

如果你想对多列应用多条件筛选，只需将上述方法重复应用于多列即可。

对多列应用筛选后，你会发现被筛选的列下拉箭头都变成了筛选图标。

2.2.2 同时对多列应用多条件筛选

使用上述方法时，需要逐列应用筛选，并且这种方式只支持“与（AND）”条件。这里我们介绍的方法不仅可以同时对多列应用筛选，还能同时支持“与（AND）”和“或（OR）”条件。

假设你有如下图所示的数据表，想要基于多个条件从多列筛选数据：“产品 = AAA-1”且“订单数 >80”，或“总价 >10000”。请尝试以下任一方法完成操作。

2.2.2.1 使用高级筛选功能对多列应用筛选

高级筛选功能可以帮助你解决此问题，请按以下步骤操作。

1. 首先，在工作表中创建筛选条件，如下图所示。

注意：对于“与（AND）”条件，请将条件值放在同一行的不同单元格中。对于“或（OR）”条件，请将条件值放在另一行。

2. 点击“数据”>“高级”，打开“高级筛选”功能。

3. 在“高级筛选”对话框中，请按如下配置。

现在，列会根据给定条件同时被筛选，如下图所示。

2.2.2.2 借助强大工具轻松对多列应用筛选

由于上述方法中的“与（AND）”和“或（OR）”筛选条件不易管理，这里强烈推荐 Kutools for Excel 的“超级筛选”功能。通过该功能，你可以轻松在 Excel 中对多列同时应用“与”和“或”条件筛选。

1. 安装 Kutools for Excel 后，点击“Kutools Plus”>“超级筛选”。

此时，“超级筛选”窗格会显示在工作表右侧。

默认情况下，“超级筛选”窗格中会添加两个空白条件组，组间为“或”关系，同组内为“与”关系。你可以根据需要更改不同组之间的关系。

2. 在“超级筛选”窗格中，请按如下配置筛选条件。

2.1）勾选“指定”框，点击 按钮选择你要筛选的原始区域或表格；

2.2）在“条件组间关系”下拉列表中，选择“或”；

3.3）点击第一个组中的第一行空白处，然后根据需要指定条件；

提示：第一个下拉列表为列标题，第二个为筛选类型（可选择“文本”、“数字”、“日期”、“年份”、“文本格式”等），第三个为条件类型，最后一个文本框输入条件值。

以上述示例为例，这里我分别从三个下拉列表中选择“产品”>“文本”>“等于”，然后在文本框中输入“AAA-1”。见下图：

2.4）继续创建其他条件，“或”条件需新建组。如图所示，所有条件已创建。你可以删除组中的空白条件。

2.5）点击“筛选”按钮开始筛选。

现在，原数据区域中仅显示符合条件的数据，其余数据被隐藏。见下图：

提示：通过此实用功能，你可以在同一组中添加更多条件、添加更多组、将当前筛选设置保存为方案以便下次使用等。它是提升工作效率、节省大量时间的必备工具。

点击了解该功能详情。

3. 如何在 Excel 中使用筛选

本节将介绍如何使用筛选命令对不同类型的数据进行筛选，包括文本、数字、日期和格式等。

3.1 筛选文本值

3.1.1 按特定条件筛选文本单元格（如开头、结尾、包含等）

实际上，内置的“文本筛选”操作符为你提供了许多实用条件，方便筛选文本。例如，你想筛选以特定字符 J 开头的单元格，请按以下步骤操作。

1. 为原始数据区域的列标题添加筛选。Click to know how to add a filter to the column header

2. 点击标题单元格中的下拉箭头，展开筛选菜单。

3. 点击“文本筛选”>“开头是”。

4. 在“自定义自动筛选”对话框中，在文本框中输入特定字符（此处输入 J），然后点击“确定”。

提示：你可以根据需要添加“与”或“或”关系的其他条件。

现在，所有以 J 开头的单元格已在 D 列中显示，如下图所示。

3.1.2 区分大小写筛选

虽然通过内置筛选操作符可以轻松按特定条件筛选文本单元格，但由于筛选功能本身不支持区分大小写筛选，如何在 Excel 中实现区分大小写的筛选？本节将介绍相关方法。

3.1.2.1 使用公式与筛选命令区分大小写筛选特定文本

假设你想筛选 B 列中全部为大写的“TEXT TOOLS”，请按以下步骤操作。

1. 在原始数据区域旁边创建一个辅助列（此处选择 D 列作为辅助列）。在第二个单元格中输入以下公式并按“Enter”键。选中结果单元格，拖动“自动填充柄”向下填充其他结果。

=EXACT(B2,UPPER(B2))

注意：该公式用于判断单元格内容是否全为大写。如果单元格内容全部为大写，结果为“TRUE”，否则为“FALSE”。

2.选中 B 列和 D 列（C 列也会被选中，无需理会），点击“数据”>“筛选”为其添加筛选。

3. 转到 B 列（包含要筛选文本的列），并按以下步骤配置。

现在，B 列中“text tools”的大写和小写均已显示。

4. 点击 D 列下拉箭头，取消勾选“全选”复选框，仅勾选“TRUE”项，然后点击“确定”。

此时，B 列中所有为大写的“text tools”已被筛选出来，如下图所示。

3.1.2.2 借助强大工具轻松区分大小写筛选单元格

如果你只想筛选某列中全部大写或全部小写的文本，推荐使用 Kutools for Excel 的“特殊筛选”功能。通过该功能，只需几次点击即可轻松筛选全部大写或小写文本。

1.选中要筛选文本的列区域，然后点击“Kutools Plus”>“特殊筛选”>“特殊筛选”。

2. 在“特殊筛选”对话框中，请按以下设置操作。

3. 此时会弹出“Kutools for Excel”对话框，告知找到并将要筛选的单元格数量，点击“确定”。

现在，所有大写或小写单元格已立即被筛选，如下图所示。

点击了解该功能详情。

3.1.3 按文本长度筛选

如果你想按文本长度筛选单元格，例如筛选长度等于10 个字符的单元格，可以参考以下三种方法。

3.1.3.1 使用筛选命令按文本长度筛选单元格

实际上，筛选命令内置了相关操作符可解决此问题，请按以下步骤操作。

1.选中要筛选的单元格区域（此处选择 B1:B27），然后点击“数据”>“筛选”为该列添加筛选。

2. 点击列标题下拉箭头，然后点击“文本筛选”>“自定义筛选”。见下图：

3. 在“自定义自动筛选”对话框中，选择条件为“等于”，在文本框中输入10 个问号（?）作为模式，然后点击“确定”。

提示：这10 个问号表示匹配长度为10 的文本字符串。

现在，所有文本字符串长度为10（包括空格）的单元格已被立即筛选。

3.1.3.2 使用公式与筛选命令按文本长度筛选单元格

此外，你还可以使用 LEN 函数计算每个单元格的文本长度，然后根据计算结果应用筛选命令筛选所需文本长度的单元格。

1. 在原始数据区域旁边创建一个辅助列。在其中输入以下公式并按“Enter”键。选中结果单元格，然后拖动“自动填充柄”向下填充其他结果。

=LEN(B2)

现在你已获得指定列中每个单元格的文本长度。

2.选中辅助列（包括标题），点击“数据”>“筛选”为其添加筛选。

3. 点击下拉箭头，取消勾选“全选”框，仅勾选数字10，最后点击“确定”。

现在，所有文本字符串长度为10（包括空格）的单元格已被立即筛选。

3.1.3.3 借助强大工具轻松按文本长度筛选单元格

这里推荐使用 Kutools for Excel 的“特殊筛选”工具，帮助你在 Excel 中轻松按文本长度筛选单元格。

1.选中要按特定文本长度筛选的列区域，点击“Kutools Plus”>“特殊筛选”>“特殊筛选”。见下图：

2. 在“特殊筛选”对话框中，请按如下配置。

3. 此时会弹出“Kutools for Excel”对话框，告知找到并将要筛选的单元格数量，点击“确定”继续。

然后，所有文本长度等于10 的单元格已被筛选，如下图所示。

3.2 筛选数值

在 Excel 中，使用“数字筛选”命令筛选数字也非常简单。

假设你想筛选某列（如 C 列）中介于15000 和20000之间的数字单元格，可按以下步骤操作。

1.选中包含要筛选数字的列区域，点击“数据”>“筛选”添加筛选。

2. 添加筛选后，请按如下配置。

提示：如需筛选介于15000 和20000之间的数字，请分别在文本框中输入15000 和20000。

现在，介于15000 和20000之间的数字单元格已被筛选，如下图所示。

3.3 筛选日期

默认情况下，内置的“日期筛选”功能提供了许多常用的日期筛选条件。但没有直接按星期几、周末或工作日筛选的选项。本节将教你如何实现这些操作。

3.3.1 按星期几或周末筛选日期

假设你有如下图所示的数据表，想要按星期几或周末筛选日期，请采用以下任一方法。

3.3.1.1 使用公式与筛选命令按星期几或周末筛选日期

本节将应用 WEEKDAY 函数计算每个日期对应的星期几，然后根据需要筛选特定的星期几或周末。

1. 在空白单元格（如 D2）中输入以下公式并按“Enter”键。选中结果单元格，拖动“自动填充柄”向下应用此公式。

=WEEKDAY(A2)

提示：

注意：该公式返回“1”到“7”的数字，分别代表“星期日”到“星期六”（1代表星期日，7代表星期六）。

2.选中所有公式结果（包括标题单元格），点击“数据”>“筛选”。

3. 点击下拉箭头，然后取消勾选“全选”复选框。

此时，所有周末或特定工作日的单元格已被筛选。见下图：

3.3.1.2 借助强大工具轻松按星期几或周末筛选日期

如果上述方法不够便捷，推荐使用 Kutools for Excel 的“特殊筛选”工具。通过该功能，只需几次点击即可轻松筛选包含任意星期几的单元格。

1.选中包含要按星期几筛选的日期单元格。

2. 点击“Kutools Plus”>“特殊筛选”>“特殊筛选”。

3. 在“特殊筛选”对话框中，请按如下配置。

4. 此时会弹出“Kutools for Excel”对话框，告知找到并将要筛选的单元格数量，点击“确定”继续。

现在，所有周末或任意工作日的单元格已被筛选。

3.3.2 借助强大工具按工作日筛选单元格

除了按星期几或周末筛选外，Kutools for Excel 的“特殊筛选”工具还可帮助按工作日筛选单元格。

1. 按同上步骤启用“特殊筛选”工具。

2. 在“特殊筛选”对话框中，按以下设置操作。

3. 此时会弹出“Kutools for Excel”对话框，点击“确定”继续。

现在，所有工作日单元格已被筛选。

3.4 筛选格式

通常，Excel 支持根据视觉条件（如字体颜色、单元格颜色或图标集）筛选数据，如下图所示。

但如果你想根据其他视觉条件（如字体样式：粗体、斜体，字体效果：删除线，或特殊单元格：包含公式）筛选数据，Excel 本身无法实现。本节将介绍解决这些问题的方法。

3.4.1 按粗体/斜体格式文本筛选

假设你想按粗体或斜体格式文本筛选数据，如下图所示，可采用以下方法。请按如下操作。

3.4.1.1 使用公式与筛选命令筛选粗体/斜体格式文本

结合 Get.Cell公式与筛选命令，可以筛选某列区域中的粗体格式文本。

1. 点击“公式”>“定义名称”。

2. 在“新建名称”对话框中，你需要：

=GET.CELL(20,$B2)

=GET.CELL(21,$B2)

公式语法：

=GET.CELL(type_num, reference)

公式参数说明

3. 在与 B2 同一行的空白单元格中输入以下公式并按“Enter”键。选中结果单元格，拖动“自动填充柄”向下应用此公式。

=Filter_Bold_Cells

4.选中所有结果单元格（包括标题），点击“数据”>“筛选”。

5. 点击下拉箭头，仅勾选“TRUE”选项，然后点击“确定”。

此时，所有粗体或斜体文本单元格已被筛选。见下图：

3.4.1.2 使用查找和替换与筛选命令筛选粗体或斜体格式文本

你也可以结合查找和替换与筛选命令实现此目的。

1.选中包含粗体或斜体文本单元格的列区域，然后按“Ctrl”+“F”组合键。

2. 在“查找和替换”对话框中，按如下配置。

3. 此时，原区域中所有粗体或斜体文本单元格已被选中，点击“开始”>“填充颜色”，为选中单元格设置填充色。

4. 再次选中整列区域，点击“数据”>“筛选”为其添加筛选。

5. 点击下拉箭头，选择“按颜色筛选”，然后在“按单元格颜色筛选”下点击刚刚设置的填充色。见下图：

此时，所有粗体或斜体文本单元格已被筛选。

3.4.1.3 借助强大工具轻松筛选粗体或斜体格式文本

如前所述，Kutools for Excel 的“特殊筛选”工具可轻松实现区分大小写筛选、按文本长度筛选、日期筛选。这里将介绍如何利用该功能筛选 Excel 中的粗体或斜体格式文本单元格。

1.选中包含粗体或斜体格式单元格的列区域（包括标题）。

2. 点击“Kutools Plus”>“特殊筛选”>“筛选粗体/筛选斜体”。见下图：

3. 在弹出的“Kutools for Excel”对话框中点击“确定”继续（该对话框会告知符合条件的单元格数量）。

此时，所有粗体或斜体格式文本单元格已被筛选。

3.4.2 按删除线格式文本筛选

假设你收到一份名单，其中部分人员被加删除线标记，需要通过筛选找出所有删除线单元格，可采用以下方法。

3.4.2.1 使用自定义函数与筛选命令筛选删除线格式文本

你可以通过自定义函数识别删除线格式文本单元格，然后根据结果使用筛选命令筛选所有删除线单元格。

1. 按“Alt”+“F11”组合键打开“Microsoft Visual Basic for Applications”窗口。

2. 在“Microsoft Visual Basic for Applications”窗口中，点击“插入”>“模块”，然后将以下 VBA代码复制到代码窗口。

Function HasStrike(Rng As Range) As Boolean
HasStrike = Rng.Font.Strikethrough
End Function

3. 按“Alt”+“Q”组合键关闭“Microsoft Visual Basic for Applications”窗口。

4. 在与要计算的单元格同一行的空白单元格中输入以下公式并按“Enter”键。选中结果单元格，拖动“自动填充柄”向下应用此公式。

=HasStrike(B2)

注意：如果对应单元格有删除线字体效果，则返回“TRUE”，否则返回“FALSE”。

5.选中所有结果单元格（包括标题），点击“数据”>“筛选”。

6. 点击下拉箭头>仅勾选“TRUE”选项>点击“确定”。见下图：

此时，所有删除线格式单元格已被筛选。

3.4.2.2 借助强大工具轻松筛选删除线格式文本

使用 Kutools for Excel 的“特殊筛选”工具，只需几次点击即可直接筛选所有删除线格式单元格。

1.选中要筛选所有删除线格式单元格的列区域，点击“Kutools Plus”>“特殊筛选”>“筛选删除线”。

2. 此时会弹出“Kutools for Excel”对话框，告知符合条件的单元格数量，点击“确定”继续。

然后，所有删除线格式单元格已被筛选，如下图所示。

3.4.3 按字体或背景色筛选

如本节开头所述，Excel 支持通过内置功能按字体颜色、单元格颜色或图标集等视觉条件筛选数据。本节将详细演示如何使用“按颜色筛选”功能按字体或背景色筛选单元格，同时推荐一款实用的第三方工具帮助解决此问题。

3.4.3.1 使用筛选命令按单一字体或背景色筛选

你可以直接使用筛选命令的“按颜色筛选”功能，在 Excel 中按指定字体或背景色筛选单元格。

1.选中要按字体或背景色筛选的列区域，然后点击“数据”>“筛选”。

2. 点击下拉箭头>“按颜色筛选”。此时会列出当前列区域的所有单元格颜色和字体颜色。点击任意颜色即可按所选颜色筛选所有单元格。

3.4.3.2 使用自定义函数与筛选命令按多种背景色筛选

如需按多种背景色筛选单元格，请采用以下方法。

假设你想筛选 B 列中所有橙色和蓝色背景色的单元格，如下图所示。首先需要计算这些单元格的颜色编号。

1. 同时按下“Alt”+“F11”组合键。

2. 在“Microsoft Visual Basic for Applications”窗口中，点击“插入”>“模块”，然后将以下 VBA代码复制到代码窗口。

VBA代码：获取单元格背景色编号

Function GetColor(x As Range) As Integer
GetColor = x.Interior.ColorIndex
End Function

3. 按“Alt”+“Q”组合键关闭“Microsoft Visual Basic for Applications”窗口。

4. 在新列的第一个单元格中输入标题（该单元格应与原区域标题同行）。

5. 在标题单元格旁的空白单元格（如 E2）中输入以下公式并按“Enter”键。选中结果单元格，拖动“自动填充柄”向下应用此公式。

=GetColor(B2)

注意：如果单元格无填充色，则返回 -4142。

6.选中辅助列单元格（包括标题），点击“数据”>“筛选”为该列添加筛选。

7. 点击下拉箭头展开下拉列表，然后按如下配置。

现在，指定背景色的单元格已被筛选，如下图所示。

3.4.3.3 借助强大工具轻松按字体或背景色筛选

毫无疑问，使用内置的“按颜色筛选”功能可以轻松按字体或背景色筛选单元格。但不足之处在于下拉列表会遮挡原始数据内容，导致无法随时查看数据以正确选择颜色。为避免此问题，推荐使用 Kutools for Excel 的“特殊筛选”工具。

1.选中要按字体或背景色筛选的列区域，然后点击“Kutools Plus”>“特殊筛选”>“特殊筛选”。

2. 在“特殊筛选”对话框中，请按如下配置。

2.1）所选列区域的单元格地址会显示在“区域”框中；

2.2）在“筛选规则”区域，选择“格式”选项；

2.3）从下拉列表中选择“背景色”或“字体颜色”；

2.4）点击吸管图标 ;

2.5）在弹出的“筛选特殊单元格”对话框中，选择包含要筛选字体或背景色的单元格，然后点击“确定”。

2.6）返回“特殊筛选”对话框后，所选单元格的字体或背景色会显示在文本框中（可根据需要修改颜色），点击“确定”开始筛选。

此时，所选区域中指定字体或背景色的所有单元格已被筛选。

3.4.4 筛选公式单元格

如果你有一份包含实际值和公式的长数据列表，只需筛选公式单元格，该如何操作？本节将介绍两种方法。

3.4.4.1 使用自定义函数与筛选命令筛选公式单元格

首先，需通过自定义函数找出列表中的所有公式单元格，然后根据结果应用筛选命令筛选公式单元格。

1. 按“Alt”+“F11”组合键打开“Microsoft Visual Basic for Applications”窗口。

2. 在“Microsoft Visual Basic for Applications”窗口中，点击“插入”>“模块”，然后将以下 VBA代码复制到代码窗口。

Function HasFormula(Cell)
HasFormula = Cell.HasFormula
End Function

3. 按“Alt”+“Q”组合键关闭“Microsoft Visual Basic for Applications”窗口。

4. 在与要检查的单元格同行的空白单元格中输入以下公式并按“Enter”键。选中结果单元格，拖动“自动填充柄”向下应用此公式。

=HasFormula(C2)

如上图所示，结果为“FALSE”和“TRUE”，表示对应单元格是否为公式单元格，TRUE 为公式单元格，FALSE 为非公式单元格。

5.选中结果单元格（包括标题），点击“数据”>“筛选”为其添加筛选。

6. 点击下拉箭头，仅勾选“TRUE”项，然后点击“确定”。

此时，所有公式单元格已被筛选。

3.4.4.2 借助强大工具轻松筛选公式单元格

本节演示如何利用 Kutools for Excel 的“特殊筛选”工具，仅需几次点击即可轻松筛选列表中的公式单元格。

1.选中要筛选所有公式单元格的列表，然后点击“Kutools Plus”>“特殊筛选”>“筛选公式”。

2. 此时会弹出“Kutools for Excel”对话框，告知符合条件的单元格数量，点击“确定”继续。

然后，所有公式单元格已被筛选，如下图所示。

此外，你还可以使用 Kutools for Excel 的“特殊筛选”功能，轻松筛选具有其他格式的单元格，例如：

筛选所有带批注的单元格，click to know more...

筛选所有基于特定值的合并单元格，click to know more...

3.5 使用通配符筛选

有时筛选时可能记不清确切的搜索条件，这种情况下建议使用通配符。

Excel 中仅有3 个通配符：

下面来看如何在筛选中使用通配符。

假设你需要筛选 B 列中所有以 Market结尾的单元格，如下图所示，请按以下步骤操作。

1. 首先，创建条件区域。输入与原列标题相同的标题，然后在下方单元格输入筛选条件。见下图：

2. 点击“数据”>“高级”。

3. 在弹出的“高级筛选”对话框中，按如下配置。

此时，所有以 Market结尾的单元格已被筛选。见下图：

* 和 ~ 通配符在筛选中的用法与上述操作相同。

3.6 使用内置搜索框筛选

如果你使用的是 Excel2010 或更高版本，会注意到筛选功能中自带搜索框。本节将演示如何利用该搜索框在 Excel 中筛选数据。

如下图所示，你想筛选所有包含“Market”的单元格，搜索框可帮助你轻松实现。

1.选中要筛选数据的列区域，点击“数据”>“筛选”为其添加筛选。

2. 点击下拉箭头，在搜索框中输入“Market”，然后点击“确定”。

在输入内容的同时，所有符合条件的文本会实时显示在列表中。

此时，所有包含“Market”的单元格已被筛选，如下图所示。

4.仅复制可见数据（忽略隐藏或已筛选数据）

使用快捷键仅复制可见数据

你可以使用快捷键仅选择可见单元格，然后手动复制并粘贴到目标位置。

1.选中要复制可见单元格的区域。此步骤中会同时选中可见和隐藏单元格。

2. 同时按下“Alt”和“;”键。此时仅选中可见单元格。

3. 按“Ctrl”+“C”复制选中单元格，然后按“Ctrl”+“V”粘贴。

借助强大工具轻松仅复制可见数据

这里为你介绍 Kutools for Excel 的“粘贴到可见”功能，帮助你在 Excel 中轻松仅复制可见数据。此外，该功能还可将数值粘贴到已筛选区域的可见单元格。

1.选中要复制可见单元格的筛选区域，然后点击“Kutools”>“区域”>“粘贴到可见”>“全部/仅粘贴数值”。

如为公式单元格，选择“全部”可复制结果和公式，选择“仅粘贴数值”则只复制实际值。

2. 在弹出的“粘贴到可见区域”对话框中，选择一个空白单元格作为粘贴目标，然后点击“确定”。

此时，所选筛选区域中的可见单元格已被复制并粘贴到新位置。

注意：如果目标区域已被筛选，所选数值只会粘贴到可见单元格。

5. 筛选后删除隐藏或可见行

对于已筛选的列表，你可能需要删除隐藏行，仅保留可见数据。本节将介绍三种在 Excel 中删除筛选列表中隐藏或可见行的方法。

使用 VBA代码删除当前工作表所有隐藏行

以下 VBA代码可帮助删除 Excel 当前工作表中的所有隐藏行。

注意：该 VBA 不仅会删除筛选列表中的隐藏行，还会删除你手动隐藏的行。

1. 在包含要删除隐藏行的工作表中，同时按下“Alt”+“F11”打开“Microsoft Visual Basic for Applications”窗口。

2. 在“Microsoft Visual Basic for Applications”窗口中，点击“插入”>“模块”，然后将以下 VBA代码复制到模块窗口。

VBA代码：删除当前工作表所有隐藏行

Sub RemoveHiddenRows()
    Dim xRow As Range
    Dim xRg As Range
    Dim xRows As Range
    On Error Resume Next
    Set xRows = Intersect(ActiveSheet.Range("A:A").EntireRow, ActiveSheet.UsedRange)
    If xRows Is Nothing Then Exit Sub
        For Each xRow In xRows.Columns(1).Cells
            If xRow.EntireRow.Hidden Then
                If xRg Is Nothing Then
                    Set xRg = xRow
                Else
                    Set xRg = Union(xRg, xRow)
                End If
            End If
        Next
        If Not xRg Is Nothing Then
            MsgBox xRg.Count & " hidden rows have been deleted", , "Kutools for Excel"
            xRg.EntireRow.Delete
        Else
            MsgBox "No hidden rows found", , "Kutools for Excel"
        End If
End Sub

3. 按“F5”运行代码。

4. 此时会弹出“Kutools for Excel”对话框，告知已删除的隐藏行数量，点击“确定”关闭。

现在，所有隐藏行（包括自动隐藏和手动隐藏）都已被删除。

使用定位功能删除筛选后的可见行

如只需删除某区域的可见行，可使用“定位”功能。

1.选中要删除可见行的筛选区域，按“F5”打开“定位”对话框。

2. 在“定位”对话框中，点击“定位条件”按钮。

3. 在“定位条件”对话框中，选择“仅可见单元格”，然后点击“确定”。

4. 此时所有可见单元格已被选中。右键点击选中区域，在菜单中选择“删除行”。

此时，所有可见单元格已被删除。

借助强大工具轻松删除筛选后的隐藏或可见行

上述方法操作繁琐且耗时。这里推荐 Kutools for Excel 的“删除隐藏（可见）行与列”功能。通过该功能，不仅可轻松删除选定区域，还可删除当前工作表、多选工作表或整个工作簿中的隐藏或可见行。请按以下步骤操作。

1.选中要删除所有隐藏或可见行的区域。

注意事项：

2. 点击“Kutools”>“删除”>“删除隐藏（可见）行与列”。

3. 在“删除隐藏（可见）行与列”对话框中，按如下配置。

4. 此时，所有可见或隐藏行会被一次性删除。同时会弹出对话框告知已删除行数，点击“确定”完成操作。

6. 跨多个工作表筛选

通常，在单个工作表中筛选数据非常简单。本节将介绍如何在具有相同数据结构的多个工作表中，使用相同条件进行筛选。

假设一个工作簿包含三张工作表，如下图所示，现在你想同时在这三张工作表中以相同条件“产品 = KTE”进行筛选，以下 VBA代码可帮你实现。

1. 按“Alt”+“F11”打开“Microsoft Visual Basic for Applications”窗口。

2. 在“Microsoft Visual Basic for Applications”窗口中，点击“插入”>“模块”，然后将以下 VBA代码复制到模块窗口。

VBA代码：同时跨多个工作表筛选数据

Sub apply_autofilter_across_worksheets()
'Updateby Extendoffice 20210518
    Dim xWs As Worksheet
    On Error Resume Next
    For Each xWs In Worksheets
        xWs.Range("A1").AutoFilter 1, "=KTE"
    Next
End Sub

注意：代码中的“Xws.Range(“A1”).AutoFilter1, “=KTE””表示将在 A 列以 =KTE 为条件进行筛选，数字1 表示 A 列的列号。你可以根据需要修改。例如，如需在 B 列筛选大于500 的数字，可将该行改为“Xws.Range(“B1”).AutoFilter2, “>500”)”。

3. 按“F5”运行代码。

此时，指定列已在当前工作簿所有工作表中同时被筛选。见下图结果。

7. 更改数据后重新应用筛选

有时你对已筛选区域进行了更改，但无论如何更改，筛选结果都不会更新（如下图）。本节将介绍两种方法，手动或自动重新应用当前区域的筛选，使更改内容被包含在筛选结果中。

手动使用“重新应用”命令重新应用筛选

Excel 内置“重新应用”功能，可帮助手动重新应用筛选。可按如下操作。

点击“数据”>“重新应用”以在当前工作表中重新应用筛选。

此时，筛选区域会重新应用，包含你所做的更改。

使用 VBA代码自动重新应用筛选

如需频繁更改筛选列表，则需反复点击“重新应用”功能。这里提供 VBA代码，帮助你在数据更改时实时自动重新应用筛选。

1. 在包含需自动重新应用筛选的工作表中，右键点击工作表标签，选择“查看代码”。

2. 在弹出的“Microsoft Visual Basic for Applications”窗口中，将以下 VBA代码复制到代码窗口。

VBA代码：更改数据时自动重新应用筛选

Private Sub Worksheet_Change(ByVal Target As Range)
   Sheets("Sheet2").AutoFilter.ApplyFilter
End Sub

注意：代码中的“Sheet2”为当前工作表名称，可根据需要修改。

3. 按“Alt”+“Q”关闭“Microsoft Visual Basic for Applications”窗口。

从现在起，当你更改筛选列表中的数据时，筛选结果会动态调整。见下方动图。

8. 清除或移除筛选

前文已介绍如何添加、应用和使用筛选。这里将学习如何在 Excel 中清除或移除筛选。

8.1 清除某列的筛选

在某列应用筛选后，如需清除筛选，点击筛选图标，然后在下拉菜单中选择“清除‘列标题’的筛选”。

8.2 清除工作表中所有筛选

如已对多列应用筛选，想要一次性全部清除，点击“数据”>“清除”。

此时，所有筛选已被清除，如下图所示。

8.3 清除当前工作簿所有工作表的筛选

假设你在一个工作簿的多个工作表中应用了筛选，想要一次性全部清除，可使用以下 VBA代码。

1. 打开需清除所有筛选的工作簿，同时按下“Alt”+“F11”。

2. 在弹出的“Microsoft Visual Basic for Applications”窗口中，点击“插入”>“模块”，然后将以下 VBA代码复制到模块窗口。

VBA代码：清除当前工作簿所有工作表的筛选

Sub Auto_Open()
'Updated by Extendoffice 20201113
    Dim xAF As AutoFilter
    Dim xFs As Filters
    Dim xLos As ListObjects
    Dim xLo As ListObject
    Dim xRg As Range
    Dim xWs As Worksheet
    Dim xIntC, xF1, xF2, xCount As Integer
    Application.ScreenUpdating = False
    On Error Resume Next
    For Each xWs In Application.Worksheets
        xWs.ShowAllData
        Set xLos = xWs.ListObjects
        xCount = xLos.Count
        For xF1 = 1 To xCount
         Set xLo = xLos.Item(xF1)
         Set xRg = xLo.Range
         xIntC = xRg.Columns.Count
         For xF2 = 1 To xIntC
            xLo.Range.AutoFilter Field:=xF2
         Next
        Next
    Next
    Application.ScreenUpdating = True
End Sub

3. 按“F5”运行代码。此时，当前工作簿所有工作表的筛选已被清除。

8.4 移除工作表中所有筛选

上述方法仅清除了筛选状态，但筛选功能仍处于激活状态。如需彻底移除工作表中的所有筛选，请参考以下方法。

通过关闭筛选移除工作表中所有筛选

点击“数据”>“筛选”关闭该功能（筛选按钮不再高亮）。

通过快捷键移除工作表中所有筛选

此外，也可通过快捷键移除工作表中所有筛选。

在包含需移除筛选的工作表中，同时按下“Ctrl”+“Shift”+“L”。

此时，当前工作表中的所有筛选会立即被移除。