VBA Textbox Autofilter隐藏了一切

Question

我使用activex文本框在我的电子表格中实现了一个谷歌搜索框。但是，一开始它工作正常，但现在它隐藏了整个使用的范围，我只看到空白单元格。这真的需要100％工作，但我无法弄清楚问题是什么。

代码如下：

Sub TextBox1_Change()

Application.ScreenUpdating = False
Range("$O$7").AutoFilter Field:=14, Criteria1:=TextBox1

End Sub

感谢您对此问题的帮助。

Answer 1

If TextBox1.vlaue = "" Then Application.Autofiltermode= False

Answer 2

我没有看到任何清除先前过滤器的声明，例如： Worksheets(1).AutoFilterMode = False

此外，Application.ScreenUpdating = True之前应该有End Sub来恢复屏幕更新。