如何在 Excel 中按粗体字符筛选单元格？

在 Excel 中，您可以应用粗体字体样式来格式化单元格中的数据或内容，但您是否知道如何通过包含粗体字体样式的单元格来筛选呢？本文收集了几个巧妙的 VBA 宏，用于在 Excel 中按粗体字符筛选单元格。

使用辅助列筛选粗体单元格
使用 VBA 代码筛选粗体单元格
使用强大的工具轻松筛选粗体单元格
更多数据筛选教程…

使用辅助列筛选粗体单元格

假设您需要筛选 B 列中所有粗体单元格，如下截图所示，请按照以下步骤操作：

下面的用户定义函数可帮助识别某一列中的单元格是否为粗体，并在辅助列中返回 TRUE 或 FALSE 的结果。您可以筛选所有 TRUE 结果，以仅显示 B 列中的粗体单元格。

1. 按 Alt + F11 键打开 Microsoft Visual Basic for Application 窗口。

2. 在 Microsoft Visual Basic for Application 窗口中，点击 插入 > 模块，然后将以下 VBA 代码复制到模块窗口中。参见截图：

VBA 代码：按粗体字符筛选单元格

Function IsBold(rCell As Range)
IsBold = rCell.Font.Bold
End Function

3. 按 Alt + Q 键关闭代码窗口。

4. 选择一个与表格相邻的空白单元格（所选单元格应位于筛选表第一行的同一行上），将以下公式复制到其中并按 Enter 键。

=IsBold(B2)

5. 继续选择第一个结果单元格，并拖动填充柄以获取所有结果。参见截图：

6. 选择辅助列的标题，点击 数据 > 筛选。点击标题单元格旁边的箭头按钮，仅勾选 TRUE 复选框，然后点击 确定。

现在，B 列中的所有粗体单元格都已筛选出来，如下截图所示。

使用 VBA 代码筛选粗体单元格

1. 选择要筛选出所有粗体单元格的列范围（不包括标题单元格）。在这种情况下，我选择 B2:B16。

2. 按 Alt + F11 键打开 Microsoft Visual Basic for Application 窗口。

3. 在 Microsoft Visual Basic for Application 窗口中，点击 插入 > 模块，然后将以下 VBA 代码复制并粘贴到模块窗口中。

VBA 代码：筛选一列中的粗体单元格

Sub FilterBold()
'Updated by Extendoffice 20191018
Dim cell As Range
For Each cell In Selection
If cell.Font.Bold = False Then
cell.EntireRow.Hidden = True
End If
Next cell
End Sub

4. 按 F5 键运行此宏。然后，所选列范围内的所有粗体单元格都会立即被筛选出来。

使用强大的工具轻松筛选粗体单元格

在本节中，我们向您推荐一个方便的工具—— Kutools for Excel 的 筛选粗体单元格 功能。使用此工具，只需几次点击即可立即筛选所选列中的所有粗体单元格。

1. 选择要筛选粗体单元格的列范围，点击 Kutools Plus > 特殊筛选 > 筛选粗体 即可完成。参见以下演示：

相关文章