Excel 使用VBA筛选等于或大于TextBox.value的值

Excel 使用VBA筛选等于或大于TextBox.value的值,excel,vba,Excel,Vba,我需要过滤列E,以便只显示等于或大于TextBox.Value的结果 到目前为止,如果值与TextBox完全匹配,我就有了要筛选的代码。value,我也尝试过类似的方法:sh.Range($E$2:$E$11”)。自动筛选字段:=5,标准1:=“>=A”,但不起作用 Private Sub TextBox_Change() If Me.TextBox.Value <> "" Then Dim sh As Worksheet Set sh = ActiveSheet

我需要过滤列E,以便只显示等于或大于TextBox.Value的结果

到目前为止,如果值与TextBox完全匹配,我就有了要筛选的代码。value,我也尝试过类似的方法:
sh.Range($E$2:$E$11”)。自动筛选字段:=5,标准1:=“>=A”
,但不起作用

Private Sub TextBox_Change()
If Me.TextBox.Value <> "" Then
Dim sh As Worksheet
Set sh = ActiveSheet
Dim A As Long

A = Me.TextBox.Value

sh.Range("$E$2:$E$11").AutoFilter Field:=5, Criteria1:=A
End If
End Sub
Private子文本框_Change()
如果Me.TextBox.Value为“”,则
将sh设置为工作表
设置sh=ActiveSheet
暗淡如长
A=Me.TextBox.Value
sh.Range($E$2:$E$11”)。自动筛选字段:=5,标准1:=A
如果结束
端接头

变量不属于引号内。使用
连接:

Criteria1:=“>=”&A