Im Workbook_open
habe ich diesen Code geschrieben damit der Hacken nicht gesetzt werden kann.
Leider erhalte ich eine Fehlermeldung
Application.CommandBars("Worksheet Menu Bar").Controls("Format").Controls("Zellen").Controls("Schutz").Enabled = False
Danke für Eure hilfe
Gruß
Franz