Es gibt zum Thema Autofilter zwar schon massig Beiträge, aber ich habe dennoch keine Lösung für mein Problem gefunden.
Dass Autofilter bei geschützten Blättern nicht richtig funktioniert, ist bekannt. Ebenso, wie man Excel in diesem Fall austricksen kann, z.B. so:
Sub Workbook_Open()
Sheets("Adresse").Protect UserInterfaceOnly:=True, Password:="Passwort"
Sheets("Adresse").EnableOutlining = True Für Gliederung
Sheets("Adresse").EnableAutoFilter = True Für AutoFilter
End Sub
Mein Problem ist aber, dass ich die Arbeitsmappe freigegeben habe. Somit führt der Befehl protect zu einem Laufzeitfehler.
Gibt es irgendeine Möglichkeit, die Filter eines geschützten sheets in einer freigegebenen Arbeitsmappe aufzuheben (ähnlich ShowAllData)?
Gruss, Marco