ActiveXテキストボックスと自動フィルタリングされた列で数値を自動ろ過しますか？

Question

これはもっと簡単だと思っていましたが、昼食を食べています。私は多くの列、いくつかのテキスト、いくつかの数値、および先頭に2つの数字が続く1つのマスターExcelリストを持っています。それらはオートフィルターで、activeXテキストボックスもあります。私は、テキストボックスをVBAにリンクし、すべてのStringベースの列を上手に動作させました。これは次のようになります：

Private Sub TextBox4_Change() 
Range("$E$1").AutoFilter Field:=5, Visibledropdown:=True 'Leave the drop down arrows on 
Range("$E$1").AutoFilter Field:=5, Criteria1:="=*" & TextBox4 & "*" 
End Sub 

は、今度は、正確な列ではなく数値で満たされていたとしましょう。どうすればいい？上記のコードで数値を除外します。誰もがこのセットアップを使ってこれを解決しましたか？私はここや他の場所で今日何時間も探していますが、この特定の問題に適切な解決策を見つけることはできません。前もって感謝します。

Answer 1

ネヴァーマインドは、これは、本当に簡単だっただけTextbox4にCriteria1の値を変更し、それがすべてです：

Private Sub TextBox4_Change() 
    Range("$E$1").AutoFilter Field:=5, Visibledropdown:=True 'Leave the drop down arrows on 
Range("$E$1").AutoFilter Field:=5, Criteria1:=TextBox4 
End Sub