选定切片机

我试图找出一种方法来快速格式化的一个或多个数据模型连接切片机（列的数目，小区宽度/高度，限幅器宽度/高度等），通常将其添加到右后工作簿，但也需求。我一直在试图找出如何遍历Selection对象层次，但我似乎无法弄清楚如何从Object/Rectangle我从Selection对象选定Slicer对象得到去。选定切片机

我看到，我可以很容易地走另一条路，虽然，在我可以直接从Slicer使用访问Shape对象ActiveWorkbook.SlicerCaches("Slicer_Test1").Slicers("Test").Shape

是我遍历所有Slicers所有SlicerCaches，直到我唯一的选择匹配与Selection同名的Shape（或者如果我选择了多个切片器，则匹配多个名称）？

这是否有意义？我认为这应该更容易理解，但是我正在试图研究它。

感谢您提供的任何指针！

编辑：删除powerpivot标签，因为现在看起来不相关。

来源

2016-01-22 spudsy

你不需要Selection都：

Dim slc     As Slicer 
Set slc = ActiveWorkbook.ActiveSlicer 
If Not slc Is Nothing Then 
    ' do stuff 
End If

来源

2016-01-22 09:11:36 Rory

大罗的建议，谢谢。我最初裁定那一个是因为我希望这可以与多个选项一起工作，我认为我在帖子中没有说得很清楚。是否有相当于'ActiveSlicer'的功能与多个选定的切片机同时使用？ – spudsy

回答

相关问题