Pivot Datenschnitt
13.08.2016 12:42:36
Shayev
ich versuche gerade ein Makro zuschreiben, welches jedes Worksheet in meiner Arbeitsmappe _
durchläuft. In einigen Worksheets habe ich Diagramme mit Datenschnitten erstellt. Nun möchte _
ich , die Datenschnitte "Test1", "Test198" und "Test155" in jedem Diagramm auf "1" und alle _
anderen Zahlen ausblenden, auswählen. Mein Versuch.
Sub Datenschnitt()
Dim ws As Worksheet
Dim sc As SlicerCache
For Each ws In ActiveWorkbook.Worksheets
sc("Datenschnitt_Test1" * "").SlicerItems("1").Selected = True
Next
End Sub
Leider bekomme ich folgende Fehlermeldung:
Laufzeitfehler 13: Typen unverträglich. Hat jemand einen Tipp für mich?
Vielen Dank im Voraus.
Gruß Shayev