带有ActiveX文本框和自动过滤列的自动筛选数值？

Question

我认为这会更容易，但它正在吃我的午餐。我有一个主要的Excel列表，包含许多列，一些文本，一些数字以及一个带有前导字母后跟两个数字的列表。他们是自动过滤器，也有一个activeX文本框。我已经将文本框链接到VBA，并使所有基于字符串的列完好无损地工作。它去如下：

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

没关系，这是很容易，只需要改变标准1至Textbox4的价值，这就是：

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