analog zu XL Pivot gibt es ja in OO den Datenpilot.
Ich bin im Moment damit ein wenig am experimentieren.
Klappt soweit eigentlich auch alles gut, aber 2 Dinge habe ich noch nicht gelöst bekommen.
1. Wie kann ich einen Bereich in der Ursprungsliste dynamisch gestalten, daß sich wenn sich Zeilen und Spalten erweitern diese automatisch in der Pivottabelle aktualisieren?
In Excel löse ich das über Vergabe eines Namen und gebe den dann bei der Quelle statt des Bereichs von bis an.
.Dem Bereich gebe ich den Namen „Pivot_Daten“ und schreiben unter „bezieht sich auf:“ die Formel „=BEREICH.VERSCHIEBEN(Tabelle1!$A$1;;;ANZAHL2(Tabelle1!$A:$A);ANZAHL2(Tabelle1!$1:$1))“ hin.
Gibts da analog was in Datenpilot ?
2. Um automatisch beim Aktivieren des Tabellenblattes die Pivottabelle bzw. Datenpilottabelle aktualisieren zu lassen weise ich dem Activate_Ereignis des Tabellenblattes einen kurzen VBA-Code zu
Code: Alles auswählen
Private Sub Worksheet_Activate()
Dim pt As PivotTable
For Each pt In Me.PivotTables
pt.RefreshTable
Next
End Sub
Danke schon mal vorab für alle Antowrten und Lösungsansätze und allen ein schönes Wochenende
Andreas