Filtern und Sortieren trotz Blattschutz?
20.03.2009 17:35:07
Kasimir
ich benötige wieder mal Eure Hilfe. Mit nachfolgendem Code gebe ich die Autofilterpfeile frei trotz Blattschutz.
Option Explicit
Private Sub Workbook_Open()
With Auflistung
.Unprotect
.EnableAutoFilter = True
.Protect , contents:=True, userInterfaceOnly:=True
End With
End Sub
Nun gibt es in dem Menü für die Filterkriterien ja auch die Möglichkeit die Daten zu sortieren. Leider funktionieren diese Funktionen nicht, wenn der Blattschutz aktiv. Kann man diese Funktionen genau wie die Filterpfeile irgendwie freigeben auch wenn der Blattschutz aktiv ist?
Danke Euch schon mal im Voraus,
Kasimir