Blattschutz und Sortierung

Forumthread: Blattschutz und Sortierung
1 Beitrag zu diesem Forumthread
Anzeige

Forumthread: Blattschutz und Sortierung

26.05.2006 15:59:34

Urmel Online

Hallo Herber Gemeinde,
ich habe ein dringendes Problem wo ich eine Lösung bräuchte. Ich habe mehrere Tabellen mit Blattschutz und der Option Sortieren und Autofilter zugelassen. Funktioniert nach der Einstellung soweit auch wunderbar. Nur wenn ich die Datei schliesse und wieder öffne, habe ich eine vollen Blattschutz ohne die vorher eingestellten Optionen. Woran liegt das ?
Vielen Dank für Eure Hilfe
Waldemar
P.S. Habe trotz intersiver Recherche keine Antwort zu diesen Thema gefunden.

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Blattschutz und Sortierung

26.05.2006 17:36:30

Gerd

AW: Blattschutz und Sortierung

26.05.2006 17:36:30

Gerd

Option Explicit


Private Sub Workbook_Open()
Dim ws As Worksheet
Set ws = Sheets("Tabelle1")
With ws
.Unprotect
.Protect DrawingObjects:=True, _
Contents:=True, _
Scenarios:=True, AllowSorting:=True
End With
End Sub

Geht ab Excel 2002(XP)
mfg Gerd

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!