Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
596to600
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
596to600
596to600
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

PivotItems Darstellung

PivotItems Darstellung
13.04.2005 13: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

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: PivotItems Darstellung
13.04.2005 14: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

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige