Excel vba仅对字符值进行筛选

我想制作一个过滤器来查看包含任何字符的行

例如，列A包含1241244231、R2341、RRR

然后我想看看A列中的R2341，RRR。有没有办法只对字符串进行过滤

谢谢

使用自动筛选中的文本筛选包含功能：

或使用VBA：

Sub Macro1()
    Columns("A:A").AutoFilter
    ActiveSheet.Range("$A$1:$A$5").AutoFilter Field:=1, Criteria1:="=*R*", _
        Operator:=xlAnd
End Sub

编辑1：

要测试是否存在任何字母，请在助手列中使用此UDF：

Public Function HasLetter(v As Variant) As Boolean
    Dim i As Long, L As Long
    HasLetter = False
    If Len(v) = 0 Then Exit Function
    L = Len(v)
    For i = 1 To L
        If Mid(v, i, 1) Like "[a-zA-Z]" Then
            HasLetter = True
            Exit Function
        End If
    Next i
End Function

---

然后过滤为True。

这只是一个例子。我需要获取包含任何字符的任何值。有没有办法制作这样的过滤器？@terny请看我的EDIT1