markierten Zellbereich schützen
23.08.2008 17:10:33
reiner
per Makro wird ein Zellbereich festgelegt und markiert für weitere Auswertungen.
Wenn nun versehentlich in irgendeine Zelle des markierten oder nicht markierten Bereich geklickt wird ist die vorherige Markierung nicht mehr vorhanden.
Der Bereich wird wie folgt markiert:
Set Bereich = ActiveSheet.Range(Cells(BereichAnfang + 1, 1), Cells(BereichEnde + 1, 13))
Bereich.Select
Eine Variable mit Namen BereichAnfang enthält die erste Zeilennummer, ebenso enthält die Variable BereichEnde die letzte Zeilennummer des zu markierenden Bereichs.
Ich habe vor langer Zeit in einem Beitrag gelesen, das mit Enable Selection sowie unlockedcells ein Bereich des Blattes vor jeglichem Zugriff durch Mausklicks von außen geschützt werden kann. Leider liegt mir dieser Beitrag nicht mehr vor und ich kann mich auch nicht an die beschriebene Vorgehensweise erinnern.
Ich bitte um Rückmeldung wenn jemand zu diesem Themenbereich einen Vorschlag hat. Dieser temporäre Blattschutz sollte durch ein Makro ein- und ausgeschaltet werden können und keinesfalls den zuvor markierten Bereich verändern.
mfg
reiner