如何在Excel中筛选仅以数字结尾的单元格？解决A至RR字母批量排除问题

针对你遇到的自带筛选仅支持2个“不结尾于”条件的限制，推荐以下几种高效的批量处理方案：

方法一：辅助列+公式判断（最通用） #

1. 在数据列右侧插入新的辅助列（比如数据在A列，插入B列）。
2. 在B1单元格输入以下公式，按回车后下拉填充至所有行：

   =NOT(OR(AND(RIGHT(A1,2)>="AA",RIGHT(A1,2)<="RR"),AND(RIGHT(A1,1)>="A",RIGHT(A1,1)<="Z")))
   

   公式逻辑：判断单元格内容是否以单个A-Z字母或AA-RR双字母结尾，若是则返回FALSE（需排除），否则返回TRUE（以数字结尾，需保留）。
3. 选中辅助列的任意单元格，点击「数据」选项卡的「筛选」按钮，筛选出值为TRUE的行即可。

方法二：高级筛选（适合一次性操作） #

如果不想用辅助列，可以通过高级筛选实现：

1. 在空白区域（比如C1:Cn）构建条件区域，列出所有需要排除的结尾模式：<>*A、<>*B……<>*Z、<>*AA、<>*AB……<>*RR。
2. 选中数据区域，点击「数据」→「高级」，选择「将筛选结果复制到其他位置」，设置「列表区域」为你的数据列，「条件区域」为刚才构建的条件列表，指定复制位置后确定即可。

   注：此方法需要手动列出所有A-RR的结尾模式，适合范围较小时使用，否则不如辅助列高效。

方法三：VBA宏（适合重复使用场景） #

如果需要频繁处理这类需求，可以编写简单宏自动筛选：

Sub FilterByNumberEnding()
    Dim ws As Worksheet
    Dim lastRow As Long
    
    Set ws = ActiveSheet
    lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    
    '清除现有筛选
    If ws.AutoFilterMode Then ws.AutoFilterMode = False
    
    '遍历判断并标记
    ws.Range("B1:B" & lastRow).Formula = "=NOT(OR(AND(RIGHT(A1,2)>=""AA"",RIGHT(A1,2)<=""RR""),AND(RIGHT(A1,1)>=""A"",RIGHT(A1,1)<=""Z"")))"
    
    '筛选标记为TRUE的行
    ws.Range("A1:B" & lastRow).AutoFilter Field:=2, Criteria1:="TRUE"
    
    '可选：删除辅助列（如果不需要保留）
    'ws.Columns("B").Delete
End Sub

使用方法：按下Alt+F11打开VBA编辑器，插入模块粘贴代码，回到Excel按Alt+F8执行宏即可。

内容的提问来源于stack exchange，提问作者dragonaire