Auswertung über Datenschnitt
23.04.2020 09:37:21
Breuer
ich bin zum ersten mal mit einer Frage in diesem Forum unterwegs und was die VBA-Programmierung angeht, relativ unerfahren. Zumeist bediene ich mich der Makro-Aufzeichnungsfunktion und versuche anschließend eine Optimierung.
Aktuell habe ich folgende Frage:
Ich habe eine umfangreiche Excel-Datei mit zahlreichen Arbeitsblättern erstellt. Darin sind Pivot-Tabellen enthalten, die auf unterschiedliche Ausgangsdaten zurückgreifen. Auf einem Arbeitsblatt, auf dem mehrere Pivot-Tabellen mit unterschiedlicher Datengrundlage vorhanden sind, habe ich mittels Datenschnitt eine Auswertung erstellt. Dabei kann ich auf einen Button drücken und es werden mir in jeder Pivot-Tabelle die einheitlichen Jahreszeiträume ausgewertet. Im VBA sieht das beispielhaft wie folgt aus:
Sub achtzig()
' achtzig Makro
With ActiveWorkbook.SlicerCaches("Datenschnitt_BAK")
.SlicerItems("1980 - 1989").Selected = True
.SlicerItems("").Selected = False
.SlicerItems("Für jeden weiteren Zeitraum, den ich auswerten möchte, besteht eine vergleichbar lange Prozedur, wodurch die Auswertung insgesamt sehr langsam wird.
An verschiedenen Stellen habe ich bereits gelesen, dass es nicht möglich ist, einen einheitlichen Datenschnitt für Pivot-Tabellen zu erstellen, die auf unterschiedlichen Daten basieren. Dennoch hoffe ich, dass jemand eine Idee hat, wie ich die Auswertung evtl. optimieren und dadurch beschleunigen kann.
Vielen Dank im Voraus und beste Grüße
Jens