Sorry für das "Dringend", aber meine Datei muss morgen versendet werden, deswegen die Eile!
In einer Datei mit mehreren Reitern, welche alle mit Blattschutz (inkl. Passwort) belegt sind, gibt es einen Reiter, in dem es Gruppierungen gibt.
Normalerweise sind diese Gruppierungen bei Blattschutz nicht mehr auf-/zuklickbar.
Mit folgendem Code funktioniert es (teilweise):
Sub Workbook_Open()
ActiveSheet.Protect userinterfaceonly:=True, Password:="MeinPasswort"
ActiveSheet.EnableOutlining = True 'für Gliederung
ActiveSheet.EnableAutoFilter = True 'für Autofilter
End Sub
Beim ersten öffnen der Datei funktioniert das mit der Gruppierung öffnen/schliessen.
Aber wenn ich die Datei dann wieder abspeichere und neu öffne, kann ich die Gruppierung nicht mehr öffnen/schliessen wegen Schreibschutz.
Fehlt hier nicht etwas?
Danke schonmal!
Gruß,
Ludwig