Details ein-/ausblenden bei Blattschutz
10.01.2013 14:41:50
Christian
habe eine Exceldatei mit mehreren Tabellenreitern, die ich allesamt mit "Blattschutz" geschützt habe.
In den Reitern befinden sich aber "gruppierte" Spalten und Zeilen.
Diese Funktion möchte ich jedoch samt dem Blattschutz nutzen.
Habe irgendwo im Netz folgenden Code gefunden, der auch - beim zuletzt genutzten _
Tabellenreiter - funktioniert:
Sub Workbook_Open()
ActiveSheet.Protect userinterfaceonly:=True, Password:="xyz"
ActiveSheet.EnableOutlining = True 'für Gliederung
ActiveSheet.EnableAutoFilter = True 'für Autofilter
End Sub
Dieser Code ist eingestellt bei "Diese Arbeitsmappe" (müsste doch dann für alle gelten, oder?
Es scheint so, als würde Excel diesen Code irgendwie ignorieren......
Habe auch bei den "Eigenschaften" jedes Reiters unter "EnableOutlining" und unter "EnableAutoFilter" das Argument "True" eingegeben; stellt sich aber offensichtlich immer wieder auf "false" (bis bei dem zuletzt geöffneten) zurück.
Fakt ist, dass ich die ein-/ausblenden-Funktion nicht nutzen kann.
Kann mir hier irgendjemand kurzfristig weiterhelfen?
Für Eure Mithilfe bin ich euch im voraus schon sehr dankbar!!!!!
Gruß
Christian
(VBA-Neuling bzw. Erst-Versucher)
Anzeige