Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
984to988
984to988
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Autofilter mit Blattschutz

Forumthread: Autofilter mit Blattschutz

Autofilter mit Blattschutz
20.06.2008 13:26:37
thomas
Hallo,
ich habe im Archiv folgenden Code gefunden:

Sub Blattschutz()
ActiveSheet.EnableAutoFilter = True
Tabelle1.Protect userinterfaceonly .=True
End Sub


habe diesen eingefügt kann aber mit Blattschutz nicht filtern.
Fehlt da etwas , kann mir jemand helfen?
Danke
thomas

Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autofilter mit Blattschutz
20.06.2008 13:33:00
Hajo_Zi
Hallo Thomas,
hast Du den Code bei open ausgeführt?
Ich vermute mal Du hat kein Passwort benutzt.

AW: Autofilter mit Blattschutz
20.06.2008 13:49:00
thomas
Hallo Hajo,
ich erkenne den Profi...
Richtig, ich habe es probehalber ohne Passwort probiert.
Sorry, was meinst Du mit open?
Danke

Anzeige
AW: Autofilter mit Blattschutz
20.06.2008 13:51:17
Hajo_Zi
Hallo Thomas,
Autofilterfunktion, Gruppierung bei Blattschutz möglich?
Diese Frage wurde in diesem Forum auch schon gestellt. Die Lösung damals:
Das funktioniert normalerweise nicht. Du kannst Excel aber austricksen.
Bevor Du auf Blattschützen stellst, blendest Du die Filter ein.
Dann schützt Du das Blatt
Jetzt folgendes Makro in VBA unter DieseArbeitsmappe 

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


‘ Datei schließen und wieder öffnen
Gruß Hajo

Anzeige
AW: Autofilter mit Blattschutz
20.06.2008 14:09:00
thomas
Hajo,
habe es gemacht wie von Dir beschrieben.
Beim öffnen der Datei kommt nun ein Hinweis:
Kompilierungsfehler im verborgenen Modul: Diese Arbeitsmappe
thomas
Danke

AW: Autofilter mit Blattschutz
20.06.2008 14:13:00
Hajo_Zi
Hallo Thomas,
den Tabellennamen Password hast Du schon angepast?
Ich sehe Deiine Datei nicht!
Gruß Hajo

Anzeige
AW: Autofilter mit Blattschutz
20.06.2008 14:21:00
thomas
ich habe im Tabellenblatt und im Makro das gleiche passwort.
In diesem Tabellenblatt sind auch Drop Down Felder, hat es damit zu tun?
thomas

AW: Autofilter mit Blattschutz
20.06.2008 14:23:00
Hajo_Zi
Hallo Thomas,
Nein
Gruß Hajo

AW: Autofilter mit Blattschutz
20.06.2008 14:50:00
thomas
Hi Hajo,
habe ein ganz neues Tabellenblatt erstellt, ohne Makros, Drop Down u. Command Button
dort funktioniert es..
Gruß thomas

Anzeige
AW: Autofilter mit Blattschutz
20.06.2008 16:44:00
guenneisen@arcor.de 

Sub Blattschutzspezial()
ActiveSheet.Protect _
AllowSorting:=True, AllowFiltering:=True, AllowUsingPivotTables:=True
MsgBox "Blattschutz wurde aktiviert", vbInformation
End Sub


;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige