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

PivotItems Darstellung

Forumthread: PivotItems Darstellung

PivotItems Darstellung
13.04.2005 15:16:24
Georg
Hallo,
ich möchte aus einer Liste eine Pivottabelle erstellen per Markro.
Ausgewertet werden unter anderem die Verantwortlichen.
Da es sich um eine dynamische Tabelle handelt, können sich auch die Verantwortlichen verändern.
Ich möchte nur bestimmte Verantwortliche(es sind 6 von ca. 24 Verantwortlichen) angezeigt bekommen.
Kenne aber nur die Methode, Verantwortliche die nicht angezeigt werden sollen, wie unten dargestellt. Gibts da eine elegantere Lösung.
With ActiveSheet.PivotTables("Pivot").PivotFields("Verantwortlicher")
.PivotItems("Meier").Visible = False
.PivotItems("Mueller").Visible = False
.......
End With
Danke vorab.
Gruß
Christian
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: PivotItems Darstellung
13.04.2005 16:08:08
Rolf
Hallo Christian,
irgendwo musst du ja mal sagen,
was du nicht sehen willst.
Eine Alternative wäre,
die auszuschließenden in ein Array zu schreiben
aus=Array("Meier",Müller"....)
und den Ausschluss dann in einer Schleife abzuarbeiten.
For i = 1 to .PivotItems.Count
For j = 1 to Ubound(aus)
If .PivotItems(i) = aus(j) Then
.PivotItems(i).Visible = False
End If
Next j
Next i
fG
Rolf
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige