Groep automatisch sluiten/invouwen bij afsluiten/opstarten

[DragonDrummer]

Beste mensen,

Ik heb hier al veel antwoorden gevonden op vragen en hoop dat u mij ook met het volgende kunt helpen.

Ik heb een vraagje over Excel. Ik heb in mijn werkblad de optie ´groeperen´ meerdere keren gebruikt om de gegevens overzichtelijker weer te geven. Echter, het komt vaak voor dat je even een groep opent om iets te bekijken en vervolgens weer verder gaat, waardoor sommige groepen open blijven staan en sommige dicht zijn.

Aangezien ik geen zin heb om iedere keer het hele bestand door te gaan om alle groepen te sluiten voor ik opsla ben ik opzoek naar een manier om deze groepen automatisch te sluiten bij het opstarten/afsluiten van het bestand. Ik heb geprobeerd een macro op te nemen die dit doet, alleen registreert de macro op de één of andere manier niets als ik dit doe.

Please help!

Vriendelijke groeten

 

[HSV]

Bv.

private sub workbook_open()
 ActiveSheet.Outline.ShowLevels 1
end sub

 

[DragonDrummer]

Thnx voor de reactie, maar helaas geen effect

 

[HSV]

Heb je de code in thisworkbook geplaatst?
Je bestand plaatsen wil ook wel eens helpen.

 

[DragonDrummer]

Je reactie heeft me wel op het goede spoor gezet! Ik heb even verder gezocht op ShowLevels en het blijkt dat ik de volgende code moet gebruiken:

ActiveSheet.Outline.ShowLevels RowLevels:=1, ColumnLevels:=1

Geen idee waarom dat wel werkt. Maar bedankt voor het antwoord in ieder geval, heeft me een hoop verder geholpen! :thumb: