The eXpLorer - Details einer Gruppierung ein- und ausblenden

Details einer Gruppierung ein- und ausblenden

Für das Ein- und Ausblenden von ganzen Ebenen existiert die ShowLevels-Methode. Der Effekt ist der gleiche wie bei Klicken auf eine im Gliederungsbereich angezeigte Ebene-Schaltfläche (die kleine Schaltfläche mit der Ziffer 1 oder höher).

Zeilen (Beispiel Ebene 2):
ActiveSheet.Outline.ShowLevels RowLevels:=2
- oder -
ActiveSheet.Outline.ShowLevels 2

Spalten (Beispiel Ebene 3):
ActiveSheet.Outline.ShowLevels ColumnLevels:=3
- oder -
ActiveSheet.Outline.ShowLevels , 3

Zeilen und Spalten gruppieren

Spalten-Gruppierung erstellen:

Columns("D:E").Group

Bei einzelnen Gruppen wird's schwieriger, weil es keine VBA-Methode gibt. Hier hilft aber ein Excel4-Makro mit der SHOW.DETAIL-Funktion.

Syntax:
SHOW.DETAIL(a,b,c[,d[,e]])
a = 1 oder 2: 1=Zeile, 2=Spalte
       In der Dokumentation steht, ...
b = Zeilen- bzw. Spaltennummer der Gruppierung
c = True oder False: True=Einblenden, False=Ausblenden
d = Wird nur bei Pivot-Tabellen verwendet.
e = Irrtümlich vom Makro-Recorder generierter Parameter.
       Der Makro-Recorder erzeugt während der Makroaufzeichnung
       einen fünften Parameter, den es eigentlich gar nicht gibt und
       auch nicht verwendet werden darf.

Beispiele:
Details von gruppierten Zeilen einblenden:
ExecuteExcel4Macro "SHOW.DETAIL(1,19,True)"
Details von gruppierten Zeilen ausblenden:
ExecuteExcel4Macro "SHOW.DETAIL(1,19,False)"

Details von gruppierten Spalten einblenden:
ExecuteExcel4Macro "SHOW.DETAIL(2,5,True)"
Details von gruppierten Spalten ausblenden:
ExecuteExcel4Macro "SHOW.DETAIL(2,5,False)"

Laufzeitfehler bei Ausführen des aufgezeichneten Makros

The eXpLorer