Hallo liebes Forum!

Ich möchte den Blattschutz via VBA aktivieren. Folgenden Code habe ich dafür:

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

(schützen; gesperrte Zellen nicht auswählen)
Nun wüsste ich gerne, wo ich hier das Kennwort eingeben kann. Normalerweise steht es ja einfach hinter

ActiveSheet.Protect

Aber hier?
Habe schon ziemlich viel ausprobiert..........


Ich danke Euch!!!!!

MlG
Bison