Office: (Office 2010) ein Filter für mehrere Pivot Tabellen

Goldberg · 18. August 2013

Hallo zusammen,

ich habe 2 oder mehr Pivots welche Ihre Daten jeweils aus verschiedenen Datenblättern beziehen. Da die Datenblätter in einigen Spalten identische Daten beinhalten (z.B. Jahr, Monat, etc.), würde ich gerne einen Filter verwenden, welcher für mehrere Pivot die Daten filtert.

Bisher habe ich hierfür keine Lösung gefunden, ist dies eventuell mit Excel 2010 möglich? Ich habe mit bereits die neue Funktion Datenschnitt angeschaut aber finde hier keinen Lösungsansatz.

Hättet ihr eine Idee wie man über einen Filter mehrere Pivots ansteuern kann?

:)

Thomas Ramel · 20. August 2013

Grüezi Goldberg

Ich habs gerade getestet - Datenschnitte funktionieren nur gemeinsam mit Pivot-Tabellen, die sich ihre Daten aus demselben Pivot-Cache holen.

In deinem Falle müsstest Du also etwas mit VBA-Programmierung für die Synchronisierung der Filter erstellen.

Goldberg · 20. August 2013

Servus Thomas,

diesen Lösungsansatz habe ich ebenfalls erarbeitet. Kannst Du oder wer anders an der Erarbeitung einer VBA- Lösung mitwirken? Meine VBA Kenntnisse halten sich doch sehr in Grenzen aber ich habe schon Beiträgein andere Foren gefunden die von einem solchen Lösungsansatz berichten.

Thomas Ramel · 20. August 2013

Grüezi Goldberg

Hier mal ein erster Ansatz, der Code synchronisiert alle PTs auf einem Tabellenblatt und geht davon aus, dass diese identisch aufgebaut sind.

Code:

Private Sub WorkSheet_PivotTableUpdate2(ByVal Target As PivotTable)
'Synchronisiert alle PTs auf einem Tabellenblatt
'Auch für die Mehrfachauswahl ab xl2007 geeignet
'Vorsicht: NICHT für Datumsfelder anwendbar
'23.08.2011 - t.ramel@mvps.org
Dim pt As PivotTable
Dim pfT As PivotField
Dim pf As PivotField
Dim pi As PivotItem

On Error GoTo ErrorHandler
Application.EnableEvents = False
For Each pt In Me.PivotTables
If pt.Name Target.Name Then
pt.ManualUpdate = True
For Each pfT In Target.PageFields
For Each pf In pt.PageFields
If pf.Name = pfT.Name Then
pf.ClearAllFilters
If Not pfT.AllItemsVisible Then
For Each pi In pfT.PivotItems
If Not pi.Visible Then
pf.PivotItems(pi.Name).Visible = False
End If
Next pi
End If
End If
Next pf
Next pfT
pt.ManualUpdate = False
End If
Next pt
ErrorHandler:
Application.EnableEvents = True
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Für genauere Unterstützung bräuchte ich schon den Aufbau deiner PTs, am idealsten in Form einer Demo-Datei mit Dummy-Daten, die Du hier an einen Beitrag anhängst.

schelder2002 · 25. August 2015

Hallo zusammen,

ich habe ein ähnliches Problem mit Excel 2010 - Pivottabellen Berichtsfilter.
Die Daten werden über eine Query Abfrage aus 3 externen Exceldateien eingelesen. Ich habe diese dann in einen Pivot Cache in eine Tabelle gebracht. Nun möchte ich gerne im ersten Berichtsfilter eine Artikelnummer auswählen und die beiden anderen PT sollen die Artikelnummer übernehmen und ,sofern Daten vorhanden, filtern.

Doktore nun schon seit einiger Zeit mit mehreren Codeschnipseln herum, leider ohne Erfolg. Kann mir jemand helfen? oder hat einen Tipp wie es funktionieren könnte?

Viele Grüsse aus dem schönen Westerwald
Schelder 2002

schelder2002 · 25. August 2015

Hallo zusammen,

hat jemand eine Idee, dir mir weiterhelfen könnte?

Office: (Office 2010) ein Filter für mehrere Pivot Tabellen

ein Filter für mehrere Pivot Tabellen

ein Filter für mehrere Pivot Tabellen

ein Filter für mehrere Pivot Tabellen

ein Filter für mehrere Pivot Tabellen - Similar Threads - Filter Pivot Tabellen

Pivot Tabelle oder doch nur mit Spezialfilter?

Filter umkehren in Pivot Tabelle

Pivot-Tabelle: mehrere Filter/Filterergebnisse nebeneinander

Filtern in Pivot Tabellen

Pivot Chart: Durch Balken anklicken, Daten anzeigen lassen

Pivot Tabellen - Filter für mehere Pivottabellen gleichzeitig setzten.

Filter einer PIVOT-Tabelle über Feld (VBA?)