Gruppierer und Autofilter in verschiedene Sheets mit Blattschutz bedienbar machen

[Mikka]

Hallo Zusammen,

ich habe ein Workbook mit 2 Sheets. Sheet 1 hat nur Outline-Gruppierer und Sheet 2 neben den Outline-Gruppierern auch Autofilter und Slicer. Beide Tabellenblätter haben Passwort Blattschutz.
Das Passwort ist 123.

Ich benötige einen VBA Code, der die Outline-Gruppierer in Sheet 1 und im Sheet 2 die Outline-Gruppierer, die Autofilter und Slicer, wie in der Datei ersichtlich, trotz des Blattschutzes bedienbar macht. Der Blattschutz sollte wie im jeweiligen Sheet der Beispieldatei angegeben sein.
Darüber hinaus soll das Workbook automatisch mit dem Sheet 1 starten und die Autofilter in Sheet 2  beim öffnen auf all data zurücksetzen.

Eine Beispieldatei findet ihr im Anhang. Es gibt hier zwar ähnliche Ansätze, aber ich bekomme es einfach nicht hin.

Vielen Dank für eure Hilfe im Voraus !!
Mikka
  Test.xlsx (Größe: 48,32 KB / Downloads: 1)

[Case]

Hallo,  

sollte so eigentlich klappen (zumindest in deiner Beispieldatei):

  Autofilter_Listobject_Datenschnitt_Gruppierung_CEF.xlsb (Größe: 53,87 KB / Downloads: 3)

Evebtuell auch hilfreich - Datenschnitt rechts anklicken, unter "Größe und Eigenschaften" den Haken bei "Gesperrt" entfernen.