如何在 Excel 中按首字母或最后一个字符筛选值？
Author: Siluvia Last Modified: 2025-05-07
为了在 Excel 中按首字母或最后一个字符筛选值，这里我们提供了三种方法。请按照以下教程操作。
使用筛选功能按首字母或最后一个字符筛选值
使用 VBA 代码按首字母或最后一个字符筛选值
使用筛选功能按首字母或最后一个字符筛选值
您可以使用 Excel 中的筛选功能按首字母或最后一个字符筛选值。
1. 选择您要按首字母或最后一个字符筛选值的整列，然后点击 数据 > 筛选。参见截图：
2. 此时，在所选列的第一个单元格上会显示一个小下拉图标。请点击下拉图标 > 文本筛选 > 开头是 / 结尾是。参见截图：
备注：
1). 如果您想按首字母筛选值，请在步骤 2 中点击“开头是”选项。在弹出的自定义自动筛选对话框中，在“开头是”后的空白框中输入您要筛选的首字母，最后点击确定按钮。
例如，您在框中输入字母“a”，点击确定按钮后，所有以字母“a”开头的值都会立即被筛选出来。
2). 要按最后一个字符筛选值，请在步骤 2 中点击“结尾是”选项。在弹出的自定义自动筛选对话框中，在“结尾是”后的空白框中输入您要筛选的最后一个字符，最后点击确定按钮。参见截图：
点击确定按钮后，所有以指定字符结尾的值将立即被筛选出来。
使用 VBA 代码按首字母或最后一个字符筛选值
您还可以使用 VBA 代码在 Excel 中按首字母或最后一个字符筛选值。
1. 同时按下 Alt + F11 键打开 Microsoft Visual Basic 应用程序窗口。
2. 在 Microsoft Visual Basic 应用程序窗口中，点击 插入 > 模块。然后复制并粘贴以下代码到模块窗口中。
VBA 代码：按首字母或最后一个字符筛选
Sub filterbyletter()
Dim rng01 As Range
Set rng01 = [A1:A8]
rng01.Parent.AutoFilterMode = False
rng01.Columns(1).AutoFilter Field: = 1, Criteria1: = "=a*", VisibleDropDown: = False
End Sub备注：
1). 在代码中，A1:A8 是包含要筛选值的列范围。您可以根据需要更改它。
2). a* 表示您将筛选所有以字母“a”开头的值。如果您想筛选所有以字符“a”结尾的值，请将 a* 改为 *a。
3). 按 F5 键运行代码。符合筛选条件的值将立即被筛选出来。
4). 运行此代码后，您可以通过点击 数据 > 筛选 来清除筛选。参见截图：
最佳办公效率工具
| 🤖 | Kutools AI 助手：基于智能执行、生成代码、创建自定义公式、分析数据并生成图表、调用 Kutools 函数等功能，彻底改变数据分析方式… |
| 热门功能：查找、高亮或标记重复项 | 删除空行 | 合并不丢失数据的列或单元格 | 四舍五入 ... | |
| 高级 LOOKUP：多条件 VLookup | 多值 VLookup | 多表查找 | 模糊查找 .... | |
| 高级下拉列表：快速创建下拉列表 | 从属下拉列表 | 多选下拉列表 .... | |
| 列管理器： 添加指定数量的列 | 移动列 | 切换隐藏列的可见状态 | 比较区域和列 ... | |
| 精选功能：网格聚焦 | 设计视图 | 增强编辑栏 | 工作簿与工作表管理器 | 资源库（自动文本） | 日期提取 | 合并数据 | 加密/解密单元格 | 按列表发送电子邮件 | 超级筛选 | 特殊筛选（筛选粗体/斜体/删除线...）... | |
| 排名前 15 的工具集： 12 种文本 工具（添加文本、删除特定字符等） | 50 多 种图表 类型（甘特图等） | 40 多种实用 公式（基于生日计算年龄等） | 19 种插入 工具（插入二维码、根据路径插入图片等） | 12 种转换 工具（小写金额转大写、汇率转换等） | 7 种合并与分割 工具（高级合并行、分割单元格等） | 还有更多... |
使用 Kutools for Excel 提升您的 Excel 技能，体验前所未有的高效。 Kutools for Excel 提供超过 300 种高级功能来提高生产力并节省时间。 单击此处获取您最需要的功能...
Office Tab 将标签式界面引入 Office，让您的工作更加轻松
- 在 Word、Excel、PowerPoint 中启用标签式编辑和阅读。
- 在同一窗口的新标签页中打开和创建多个文档，而不是在新窗口中进行操作。
- 将您的生产力提升 50%，每天为您减少数百次鼠标点击！