Zell-Selektion auf nicht geschützte Zellen beschränken

Dieses Makro beschränkt die Zell-Auswahl auf ungeschützte Zellen. Dazu ist es notwendig, dass der Blattschutz gesetzt ist. Wenn Sie dieses Makro ausführen, können Sie nur noch die ungeschützten Zellen auswählen. Sie haben damit die Möglichkeit, eine Art Formular zu gestalten, in dem wirklich nur die Zellen ausgewählt werden können, in die auch Werte erfasst werden sollen.

Public Sub Selektion_beschränken()

'Die Zell-Slektion wird auf ungeschützte Zellen beschränkt
'Zellen, die mit Zellschutz versehen sind, können nicht mehr
'selektiert werden!

Worksheets("Tabelle1").EnableSelection = xlUnlockedCells

End Sub