選定切片機

我試圖找出一種方法來快速格式化的一個或多個數據模型連接切片機（列的數目，小區寬度/高度，限幅器寬度/高度等），通常將其添加到右後工作簿，但也需求。我一直在試圖找出如何遍歷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

回答

相關問題