Excel VBA - Ausgewählte Element aus Slicer zurückgeben

Question

Ich habe einen Slicer mit einem einzelnen ausgewählten Element, und ich muss nur eine Variable mit dem entsprechenden Text des ausgewählten Elements aus meinem Pivot Slicer dimmen. Ich habe das mit keinem Glück versucht:

Answer 1

Das Problem hier ist, dass Sie versuchen, über Schneidemaschinen statt Slicer Elemente zu iterieren.

Sie können diese einfach einen Elementnamen angezeigt werden, wenn es aktiviert ist (so wird es eine msgbox für jedes ausgewähltes Element zeigen, unabhängig von der Zählung) so etwas wie diese

Dim o_slicer_item As Object 

For Each o_slicer_item In ActiveWorkbook.SlicerCaches("Slicer_HeaderTitle").SlicerItems 
    If o_slicer_item.Selected = True Then MsgBox o_slicer_item.Name 
Next 

versuchen. Wenn Sie nur einen (ersten, letzten oder n-ten) anzeigen möchten, müssen Sie ihn ändern, um die Schleife an einem korrekten Punkt zu unterbrechen.