Ich habe 45 Tabellen in einer Arbeitsmappe. Diese Tabellen sind einzeln mit einem Blattschutz versehen. Gibt es eine Möglichkeit alle Tabellen, sozusagen in einem Durchgang zu schützen und zu entschützen ? Das Kennwort für alle Tabellen ist natürlich gleich.
Für Eure Hilfe Danke im Voraus
Josef
Hallo Josef,
entweder die komplette Mappe schützen => öffnen der Datei erst nach Eingabe des Passworts möglich
oder
alle Tabellen markieren und in einem Durchgang schützen
Grüsse
Sven
Hallo Sven,
schon seit EXCEL 5.0 suche ich auch nach der Möglichkeit mehrere Tabellenblätte in einem Durchgang zu schützen.
Aber wenn ich, auch jetzt mit EXCEL 2000, mehr als ein Blatt markiere ist die Funktion Extras/schutz/Blatt schützen nicht aktiv.
Gibts da noch was?
Ullrich Sander
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hallo Ullrich,
hab heute Morgen mein Problem in einer Excel-Newsgroup gepostet und prompt eine Lösung bekommen.
Hab es schon ausprobiert - super !
Vielleicht kann ich Dir damit helfen.
Hallo Josef
nachfolgende 4 Makros befinden sich in meiner
personl.xls und stehen somit per Tastendruck
immer zur Verfügung.
Sub Schutzweg()
'Tastenkombination: Strg+w
'
ActiveSheet.Unprotect
End Sub
Sub Schutzhin()
'Tastenkombination: Strg+h
'
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
Sub Schutzalleweg()
'Tastenkombination: Strg+e
'
For Each w In Sheets
w.Activate
ActiveSheet.Unprotect
Next w
End Sub
Sub Schutzallehin()
'Tastenkombination: Strg+i
'
For Each w In Sheets
w.Activate
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Next w
End Sub
mfg
karl-heinz
Hallo Sven,
schon seit EXCEL 5.0 suche ich auch nach der Möglichkeit
mehrere Tabellenblätte in einem Durchgang zu schützen.
Aber wenn ich, auch jetzt mit EXCEL 2000, mehr als ein Blatt
markiere ist die Funktion Extras/schutz/Blatt schützen nicht
aktiv.
Gibts da noch was?
Ullrich Sander
Hallo Josef,
vielen Dank für die Makros!
Werd sie gleich mal ausprobieren.
Ullrich Sander
Hallo Josef,
entweder die komplette Mappe schützen => öffnen der Datei
erst nach Eingabe des Passworts möglich
Ist leider nicht des Rätsels Lösung.
oder
alle Tabellen markieren und in einem Durchgang schützen
Genau das funktioniert leider nicht. Das Menü "Extras" - "Schutz" - Blatt schützen" ist nicht aktiv, wenn alle Blätter markiert sind. Doch genau das suche ich.
Grüsse
Sven
Danke trotzdem - Josef