Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Pivot Tabelle Filtern über VBA

Pivot Tabelle Filtern über VBA
04.11.2006 16:00:20
Frank
Hallo Excel Freunde
Ich habe eine Frage bezüglich Pivot Tabelle.
Die Pivot Tabelle wird für die Mahnungen benutzt und enthält 3 Stuffen die man wählen kann.
Jetzt möchte ich das über VBA die 3 Stuffen in der Pivot Tabelle Selektiert werden und in eine Separate Tabelle kopiert werden.
Die Selektion habe ich mit folgende Code gemacht:
ActiveSheet.PivotTables("PivotTable1").RefreshTable
ActiveSheet.PivotTables("PivotTable1").PivotFields("Relance").CurrentPage = 1
Es erscheint aber die meldung : Unable to get the PivotTables property of the Worksheet class.
Ich vertehe nicht was ich hier falsch gemacht habe
Bitte um Ihre untertstuzung
Vielen dank
Frank
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pivot Tabelle Filtern über VBA
04.11.2006 16:52:32
fcs
Hallo Frank,
der Code läuft nur wenn das Tabellenblatt mit der Pivot-Tabelle das aktuelle Blatt ist oder das Tabellenblatt mit der Pivot-Tabelle direkt angesprochen wird.
Also vor die Zeilen ein
Worksheets("PivotTabellenBlattName").Select
oder ActiveSheet in den Zeilen durch das Tabelenblatt mit der Pivot-Tabelle ersetzen.
Worksheets("PivotTabellenBlattName").PivotTables("PivotTable1").RefreshTable
Worksheets("PivotTabellenBlattName").PivotTables("PivotTable1").PivotFields("Relance").CurrentPage = 1
Gruss
Franz
Anzeige
AW: Pivot Tabelle Filtern über VBA
04.11.2006 21:30:07
Frank
Hallo Franz
Vielen dank für dein Antwort. Ich probiere es aus und melde mich wieder
Gruß
FrankFrank
AW: Pivot Tabelle Filtern über VBA
05.11.2006 09:18:28
Frank
Hallo Franz
Es funktionniert. Besten dank für deine unterstutzung
Gruß
Frank
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige