Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
856to860
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
856to860
856to860
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Autofilter und Blattschutz im Makro

Autofilter und Blattschutz im Makro
23.03.2007 14:18:27
Kathi
Hallo zusammen,
ich würde mich sehr über Hilfe freuen.
Folgendes Problem:Mit dem Makro

Sub AlleBlaetterSchuetzen()
Dim wksWorksheet As Worksheet
For Each wksWorksheet In ActiveWorkbook.Sheets
wksWorksheet.Protect Password:="abc"
Next wksWorksheet
End Sub

schütze ich in meiner Datei alle Arbeitsblätter auf einmal.
Wenn ich das Blatt manuell über Extras-Schutz-Blatt schützen schütze,habe ich die Möglichkeit zu aktivieren,dass trotz des Schutzes noch der Autofilter genutzt werden kann.
Das müsste man doch auch in das Makro einbauen können? Nur wie,das habe ich noch nicht herausgefunden?
Vielen Dank im Voraus für eure Hilfe.
Ein schönes Wochenende
Kathi

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

Betreff
Datum
Anwender
Anzeige
AW: Autofilter und Blattschutz im Makro
23.03.2007 14:41:34
Jürgen
Hallo Kathi,
wksWorksheet.Protect Password:="abc", AllowFiltering:=True
Gruß
Jürgen
AW: Autofilter und Blattschutz im Makro
23.03.2007 14:44:29
dieter(drummer)
Hi Katzhi,
diese Zeile einfügen:
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFiltering:=True.
Hab es mit MakroreKorder aufgezeichnet.
Gruß dieter(drummer)
AW: Autofilter und Blattschutz im Makro
26.03.2007 12:04:00
Kathi
vielen Dank euch zweien für die schnelle Hilfe.
Funktioniert super!
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige