使用vba和过滤器创建一个excel搜索引擎

Question

我正试图创建一个搜索引擎，使用vba根据在单元格/搜索栏中输入的值过滤我的行。

    Sub DateFilter()
    'hide dialogs
    Application.ScreenUpdating = False
    'filter for records that have June 11, 2012 in column 3
    ActiveSheet.Range("A5:C30").AutoFilter Field:=3, Criteria1:=ActiveSheet.Range("A5").Value
    Application.ScreenUpdating = True
End Sub

当用户点击我的搜索按钮时，该宏将运行，并将根据单元格A5中的单元格值过滤我的行。

然而，当代码进行筛选时，它显示了错误的结果。

我在excel中有以下布局：

A           B            C
White       XXX          London
Black       ZZZ          Manchester
Gold        TTT          England
Silver      FFFF         Scotland

如果我在手机A5中输入白色，它会显示银色吗？

有人能告诉我哪里出了问题吗？感谢

Answer 1

正如Gary的学生所评论的，您当前正在根据行中的单元格值来筛选行。

相反，可以根据外部的值（如D1）对其进行过滤。然后你可以把你喜欢的任何东西放进D1单元格中进行过滤。