Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1408to1412
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Gruppierung trotz Blattschutz

Gruppierung trotz Blattschutz
11.02.2015 07:52:13
Jessica
Guten Morgen,
ich möchte mit folgendem Code erreichen, dass ich den Autofilter und die Gruppierungen trotz Blattschutz benutzen kann. Das funktioniert auch allerdings nur in dem Blatt welches aktiv war als ich das letzte mal gespeichert und geschlossen habe, ich möchte aber das es in jedem Tabellenblatt funktioniert.
Kann mir jemand helfen?

Sub Workbook_Open()
ActiveSheet.Protect userinterfaceonly:=True, Password:="Passwort"
ActiveSheet.EnableOutlining = True 'für Gliederung
ActiveSheet.EnableAutoFilter = True 'für Autofilter
End Sub

Liebe Grüße,
Jessi

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Gruppierung trotz Blattschutz
11.02.2015 08:33:40
Klaus
Hi Jessi,
den Code nicht übers "Aktive", sondern über jedes Blatt laufen lassen:
Private Sub Workbook_Open()
Dim MyWks As Worksheet
For Each MyWks In Application.Worksheets
MyWks.Protect userinterfaceonly:=True, Password:="Passwort"
MyWks.EnableOutlining = True 'für Gliederung
MyWks.EnableAutoFilter = True 'für Autofilter
Next MyWks
End Sub
Grüße,
Klaus M.vdT.

AW: Gruppierung trotz Blattschutz
11.02.2015 10:02:41
Jessica
Vielen Dank, funktioniert super :-)

Danke für die Rückmeldung! owT.
11.02.2015 10:07:15
Klaus
.
Anzeige

166 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige