PivotTable: Items in Seitenbereich ein-/ausblenden

23/03/2009 - 13:28 von Robin Schilling | Report spam
Hallo

in einer Pivot-Tabelle habe ich Jahr und KW im Seitenbereich.
Nun kann ich über Feldeigenschaften einzelne KW ausblenden.

Das Ganze möchte ich jetzt aber via VBA machen. Wie ich das mal versucht
habe, ist das auch möglich.

Nun möchte ich den aktuellen Status (ein- oder ausgeblendet) dieser
Items herausfinden, was ich aber nicht schaffe.

Mit:
ActiveSheet.PivotTables(<PivotTable>).PivotFields(<Field>).PivotItems(i).Visible
bekomme ich praktisch immer FALSE.
Also wenn "(Mehrere Elemente)" oder "(Alle)" angezeigt wird, sind alle
FALSE.

Hat mir jemand eine Idee, wie ich das über VBA lösen kann und heraus
bekomme, welche Items ein-/ausgeblendet sind?

Besten Dank schon im Voraus für jeden Hinweis.

Gruss
Robin
 

Lesen sie die antworten

#1 Thomas Ramel
23/03/2009 - 19:37 | Warnen spam
Grüezi Robin

Robin Schilling schrieb am 23.03.2009

in einer Pivot-Tabelle habe ich Jahr und KW im Seitenbereich.
Nun kann ich über Feldeigenschaften einzelne KW ausblenden.



Mit welcher Excel-Version arbeitest Du denn?
Gerade in Verbindung mit Pivot-Tabellen unterscheidet sich hier xl2007
stark von den àlteren Versionen.

Das Ganze möchte ich jetzt aber via VBA machen. Wie ich das mal versucht
habe, ist das auch möglich.



Ja, das ist korrekt und je nach Version etwas einfacher (oder halt nicht)

Nun möchte ich den aktuellen Status (ein- oder ausgeblendet) dieser
Items herausfinden, was ich aber nicht schaffe.

Mit:
ActiveSheet.PivotTables(<PivotTable>).PivotFields(<Field>).PivotItems(i).Visible
bekomme ich praktisch immer FALSE.
Also wenn "(Mehrere Elemente)" oder "(Alle)" angezeigt wird, sind alle
FALSE.

Hat mir jemand eine Idee, wie ich das über VBA lösen kann und heraus
bekomme, welche Items ein-/ausgeblendet sind?



In xl2007 kannst Du mit der Eigenschaft .VisibleItemsList arbeiten, die dir
als Array alle sichtbaren Items liefert.

Bis xl2003 musst du alle Items in einer Schleife durchlaufen und prüfen ob
.Visible = True oder False gesetzt ist.

Hier in der NG gibt es IMO auch schon ein paar Beispiele zu diesem Thema.


Mit freundlichen Grüssen
Thomas Ramel

- MVP für Microsoft-Excel -
[Vista Ultimate SP-1 / xl2007 SP-1]

Ähnliche fragen