Pivottabelle filtern

Hi,

ich habe folgende Frage:

ich habe eine mehrspaltige Pivottabelle. Nun möchte ich die Pivottabelle durchsuchen lassen nach Zahlen >2. Das Gesamtergebnis soll nicht berücksichtigt werden.
Die gefundenen Zellen sollen in ein anderes Tabellenblatt kopiert werden.

Wie greife ich auf die Pivotfelder zu per vba?

danke schonmal

ich habe eine mehrspaltige Pivottabelle. Nun möchte ich die
Pivottabelle durchsuchen lassen nach Zahlen >2. Das
Gesamtergebnis soll nicht berücksichtigt werden.
Die gefundenen Zellen sollen in ein anderes Tabellenblatt
kopiert werden.

Wie greife ich auf die Pivotfelder zu per vba?

Hallo FS,

bei Pivottabellen bin ich ein DAU.
Macht mir aber nix aus, du kennst dich da ja aus, das kann reichen.
Anonymisiere deine Daten wenn sie so schrechklich geheim sind
und lade mal die Mappe hoch mit fileupload, s. FAQ:2606
Kannst auch die datenmenge kürzen, 10.000 Datensätze sind nicht nötig.

Du willst filtern lassen nach >2, geht das nicht in der PT mit
Autofilter—Benutzerdefiniert?
Das dann als makro aufzeichnen lassen!?

Gruß
Reinhard

Hier die Datei

http://www.file-upload.net/download-4197058/KW9.XLS…

Leider bringt mich ein Makro nicht weiter.

ich beschreib mal dass was passieren soll in Worten

if ActiveSheet.PivotTables(„PivotTable1“).PivotFields(„Material“).value >„1“
Then
Copy Material+Linie+Menge in Sheet(„Tabelle1a“)