excel - 其他列表中的 Excel 过滤器

Question

我在excel中有2个列表。第一个用于搜索（我想有保管箱），第二个列表用于数据。在第二个列表中，我过滤了数据。但我现在要做的是从第一个列表中给出的参数中过滤。

如何在第一页传输过滤器标题？

我想在“搜索”列表中选择品牌，结果将在“行”列表中过滤。

Answer 1

如果没有 VBA，我想不出一种方法来做这件事。当然很想知道是否有办法，所以也许其他人可以插话。

也就是说，这是一个小的 VBA 程序，可以得到你想要的。它基于搜索表中品牌下拉框中的更改而起作用。请按照以下步骤实施：

• 在 Excel 中按键盘上的 Ctrl + F11 一次。这将打开 VBE
• 在左上角的项目 - VBAProject 窗口中，单击引用搜索表的对象
• 将以下代码粘贴到右侧参考该表的大窗口中。

• 如果使用 XL2007 或更高版本，请确保将文件保存为 .xlsm 文件（启用 Excel 宏的文件）。

  Private Sub Worksheet_Change(ByVal Target As Range)

  Dim wksFilter As Worksheet, wks As Worksheet
  Dim rngFilter As Range
  
  'replace "A6" with the cell where the Brand dropdown is
  If Target.Address = "$A$6" Then
  
      Set wks = Sheets(Target.Parent.Name)
      Set wksFilter = Sheets("Rows")
  
      'may need to adjust the number 1 to match the exact location of your Search Column in the rows sheet
      wksFilter.UsedRange.AutoFilter 1, wks.Range(Target.Address)
  
  End If
  

  结束子