在列中进行过滤时，如何使用单元格中的搜索字符串？

Question

我有一个表，其中第4列包含一堆不同的风格：

我想做些可以根据自己选择的类型过滤列的内容。这是我到目前为止的内容：

在不同的工作表中，每个不同流派都有一个复选框（在本示例中只有3个流派），并且通过单击复选框，单元格C2中的字符串以这种方式添加了流派的名称用于过滤表格中的第4列。

我的问题是，既然我现在在单元格C2中有我想要的过滤器，我想将此搜索字符串应用于列以过滤出行，就像我是这样手动进行的：

因此，当我单击“过滤器”按钮（在第二幅图像中）时，此搜索字符串将从单元格C2中应用并被过滤掉。

到目前为止，这是我的“过滤器”按钮的宏：

Private Sub CommandButton1_Click()
    Worksheets("TableSheet").ListObjects("Table1").Range.AutoFilter Field:=4, Criteria1:= _
    Worksheets("GenrePick").Range("C2").Value
End Sub

“ TableSheet”工作表中包含我要过滤的表，“ GenrePick”工作表是我选择要过滤的流派的工作表。

当前宏会过滤掉所有行，并且与符合条件的行不匹配。