Bis jetzt hab ich immer nur einzelne Blätter schützen. Wie kann ich alle Tabellen gleichzeitig schützen. Das mit der Arbeitsmappe funktioniert irgendwie nicht. Wenn geht ohne VBA! Wer kann mir bitte helfen!
LG Thomas
Sub Schutz_einrichten()
Dim ws As Object
For Each ws In Worksheets
ws.Protect ("Dein Passwort")
Next
End Sub