通过从VBA中的单元格中读取值来更改过滤器值

Question

我有一个带有切片器的标签。切片器之一按月过滤数据。我正在尝试在VBA中编写代码，该代码使用另一个选项卡上的单元格中的值来更改切片器过滤器。在此示例中，我的限幅器从6变为12。我想在另一个选项卡的Cell G3中输入6，然后在VBA中使用该值来定义应选择的过滤器

这是代码：

ActiveWorkbook.SlicerCaches("Slicer_Quote_Month").VisibleSlicerItemsList = _
        Array( _
        "[Table_OpenSQ].[Quote Month].&[6]")

如何将“ 6”更改为另一个工作表/标签上单元格中指定的值？

Answer 1

使用此：

ActiveWorkbook.SlicerCaches("Slicer_Quote_Month").VisibleSlicerItemsList = _
        Array("[Table_OpenSQ].[Quote Month].&[" & Worksheets("Name").Range("B1").Value & "]")