Zellauswahl nur für ungeschützte Zellen zulassen
Sie haben ein Umfrageformular entworfen und es so geschützt, dass nur noch in bestimmten Zellen die Eingabe von Werten möglich ist. Andere lassen sich zwar auswählen, Excel liefert jedoch eine Warnmeldung bei einer versuchten Eingabe. Das verwirrt. Besser wäre es, wenn nur noch die Auswahl ungeschützter Zellen möglich ist.
Ältere Excel-Varianten ab XP bietet eine Funktion für diese Aufgabe: Öffnen Sie “Extras | Schutz | Blatt schützen”, deaktivieren Sie im folgenden Dialog “Gesperrte Zellen auswählen” und geben Sie dann das Kennwort für den Blattschutz ein. Nach einem Mausklick auf “OK” ist die Funktion aktiv und Sie können nur noch ungeschützte Zellen auswählen.
Unter Excel 2000 müssen Sie sich mit einem kleinen Autostart-Makro behelfen. Starten Sie dazu in der betreffenden Arbeitsmappe “Extras | Makro | Visual Basic-Editor”. Klicken Sie im Projektexplorer doppelt auf “Diese Arbeitsmappe”. Im folgenden Dialogfenster wählen Sie im linken Kombinationsfeld “Workbook” und rechts daneben “Open”. Geben Sie folgenden VBA-Code in den Editor ein:
Private Sub Workbook_Open()Worksheets("Tabelle1")
EnableSelection = xlUnlockedCells
End Sub
Beenden Sie die Eingabe mit “Datei | Schließen und zurück zu Microsoft Excel”. Speichern und schließen Sie Ihre Arbeitsmappe. Ab dem nächsten Öffnen können Sie nun auch hier nur noch die ungeschützten Zellen auswählen.
Ähnliche Beiträge:
Gilt für: Excel 2000, Excel XP, Excel 2003



Möglicherweise wird dieser Tipp nicht mehr von sehr vielen Leuten benötigt, dennoch sollte er richtig sein.
Es wurde nämlich ein entscheidender Punkt und eine Trennung vergessen. Damit hat es bei mir nach langem probieren dann funktioniert:
Private Sub Workbook_Open()
Worksheets(“Tabelle1″).EnableSelection = xlUnlockedCells
End Sub
Erwähnt werden sollte auch noch das “Tabelle1″ entsprechend geändert werden muss wenn das Registerblatt umbenannt wurde oder man auch noch mehr Tabellen hinzufügen kann.