Ich habe vor eine Activeworkbook zu schützen per "Blattschutz" möchte aber das so gestalten das wenn eine bestimmte UserForm aktiviert wird das der Blattschutz aufgehoben wird und damit per UserForm Einträge gemacht werden können. Aber sobal die UserForm deaktiviert ist (bzw. auch vorher !) soll der Blattschutz wieder aktiviert werden, sodas der Nutzer ohne UserForm keine Änderungen vornehmen darf bzw. kann ?!?!?
Mit VBA Code bitte... MfG Sven Calf
könntet ihr eventuel diesen quelltext so verändern das sich die arbeitsmappe dann nur auf "blattschutz deaktiviert" wenn eine userform per buttonklick gestartet wird und bei schliesen der userform der blattschutz wieder aktiviert wird.
MfG und auf bald Sven Calf
AW: Arbeitsmappe schützen
16.05.2004 22:05:07
Josef
Hallo Sven!
Wenn du's so willst. PrivateSub UserForm_Initialize() Sheets("Tabelle1").Unprotect password:="DeinPasswort" 'Tabellenname und Passwort anpassen! EndSub