habe dieses Macro für alle Sheets gefunden,
Sub Schutz()
Dim wks As Worksheet
For Each wks In worksheets
wks.Protect password:="dein passwort", DrawingObjects:=True, Contents:=True, Scenarios:=True
Next wks
End Sub
geht das auch nur für meine Sheets 1-12 ? nur nicht gesperrte Zellen aktiv bleiben ?Gruß Matze