ich wähle in einem Blatt einen Zellenbereich aus z.B. Range(A1:G5). Darin befinden sich gesperrte und nicht gesperrte Zellen. Ich will alle Zellen löschen lassen, die nicht gesperrt sind. Wie mache ich das ?
Frohe Weihnachten
Bernhard
Dim Zelle As Range
For Each Zelle In Sheets("Tabelle1").Range("A1:G5") '---Blattname anpassen
If Zelle.Locked = False Then Zelle.ClearContents
Next Zelle