Gruppe
Allgemein
Problem
Die Tabellenblattnamen sollen vor Änderungen geschützt werden.
StandardModule: Modul1
Sub SchutzEin()
ActiveWorkbook.Protect _
Password:="Passwort", _
structure:=True, _
Windows:=False
End Sub
Sub SchutzAus()
ActiveWorkbook.Unprotect "Passwort"
End Sub