슬라이서에서 필터링 된 항목을 반복합니다.

Question

매크로를 쓰려고하는데 따라 잡았습니다. 이미 필터링 된 슬라이서에서 보이는 객체만을 통해 루프 할 루프를 어떻게 만듭니 까?

아래 이미지는 사용하려는 슬라이서 ("slicer_Route")이며 처음 4 개의 어두운 객체를 반복하는 루프 만 있습니다. (이들은 다른 필터의 결과였다)

슬라이서 :

Answer 1

난 당신이 뭘 원하는지 모르지만이 보이는 아이템 통과 :

Dim sC As SlicerCache 
Dim sI As SlicerItem 

Set sC = ActiveWorkbook.SlicerCaches("Slicer_Route") 

For Each sI in sC.SlicerItems 
If sI.Selected = True Then 

Debug.Print sI.Name 'This is an example, you can do what you want with that item 

End If 

Next sI 

당신이 만약 더 자세한 질문을하면 더 많은 도움을 얻을 수 있습니다.