创建用于选择切片器选择的VBA

Question

我想使用我的Excel和数据透视表作为模板。因此，在创建模板时，将清空到数据透视表和切片器的所有链接数据。生成模板后，切片器设置丢失。有什么方法可以对数据透视表进行强制性和永久性选择吗？您可以建议VBA代码吗？ 我想在“部门（名称）”列中选择不同的部门。例如，“公共便利设施”表中名为“公共便利设施”的部门。 谢谢！ enter image description here

Answer 1

假设您甚至都不知道从哪里开始，我建议您首先使用宏记录器创建切片器，然后选择一些项目。

您可以使用类似这样的内容：

   ActiveWorkbook.SlicerCaches("NameFromSlicer").SlicerItems("NameFromItem").Selected = True

在先前创建的切片器中选择特定项目。 还有

    ActiveWorksheet.PivotTables("NameFromPT").Slicers.Add

添加切片器。请注意，您必须将“添加”方法的参数设置为准。