文字値のvbaフィルタのみ

Question

任意の文字を含む行を表示するフィルタを作成したいとします。例えば

、列Aは124124、4231が含まれ、R2341、RRR

その後、私は列AからR2341、RRRを見たいだけで、文字列に基づいてフィルタリングする方法はありますか？

ありがとうございます！

あるいはVBAで：

Answer 1

テキストフィルタを使用すると、オートフィルタで機能が含まれています

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

EDIT＃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 

とフィルタ：ヘルパー欄の。