vorab möchte ich gerne sagen, dass ich bereits schon mehrmals gegoggelt habe, bisher aber noch nicht das richtige gefunden.
Problem: möchte gerne die Gruppierungsfunktion nutzen trotz Blattschutz. Habe folgendes eingefügt:
Sub Workbook_Open()
ActiveSheet.Protect userinterfaceonly:=True, password:="bugatti13"
ActiveSheet.EnableOutlining = True 'für Gliederung
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Protect userinterfaceonly:=True, password:="bugatt13"
ActiveSheet.EnableOutlining = True 'für Gliederung
End Sub
Wenn ich die Datei abspeicher und sie dann neu öffne funktioniert es nicht mehr. Warum?
Vielen Dank im voraus
Christian