Hallo Exel-Profis,
ich habe eine Frage, die hoffentlich ganz simpel für Euch ist.
Ich gruppiere mittels VBA ein Tabellenblatt (siehe unten) und das funktioniert auch (Yippee ;-))
Mein Problem ist:
Nach der Ausführung der Gruppierung ist die Tabelle immer im Zustand der geöffneten Gruppierung (also alle Spalten sichtbar). Man muss also immer erst auf die "1" (links oben) klicken, damit die Gruppierung tatsächlich ausgeführt, das Tabellenblatt also in die kompakte Form gebracht wird.

Kann mir jemand sagen, wie ich das mit VBA machen kann?

Vielen Dank,
Caro
--------------------------------------------------------------------------------

...
On Error GoTo KeineGruppe
Columns("D:E").Ungroup
Columns("D:E").Group
Columns("L:AE").Ungroup
Columns("L:AE").Group
Columns("AG:AJ").Ungroup
Columns("AG:AJ").Group
Columns("AL:AO").Ungroup
Columns("AL:AO").Group
Columns("AU:AY").Group
Columns("AU:AY").Ungroup
Columns("BA:BC").Group
Columns("BA:BC").Ungroup

Exit Sub

KeineGruppe:
Columns("D:E").Group
Columns("L:AE").Group
Columns("AG:AJ").Group
Columns("AL:AO").Group
Columns("AU:AY").Group
Columns("BA:BC").Group
...