Inhalte nicht gesperrter Zellen löschen

[vision]

Ich bekomme es nicht hin  :22:
Es werden immer wieder alle Zellen gelöscht.
Könntest Du mir ein Beispiel schreiben, wie bestimmte Zellen angesprochen werden?

---

Hallo,

und wenn du dich parout nicht mit einer Vorlagen anfreunden willst, musst du dann wohl oder über per VBA die Formeln in den ungesperrten Zellen wieder eintragen - im Löschmakro nach dem Löschen!

Hallo, ich habe mich schon damit angefreundet, dass die Zellen mit Formel nicht gelöscht werden. In aller Regel sind es auch nur kopierte Werte, die durch das Löschen der Ursprungszelle dann sowieso zurückgesetzt werden. Ist bisschen kompliziert

[schauan]

Hallöchen,

Wenn Du die Zellen z.B. mit "Willi" und "Horst" benamst und dort alle Zellen leeren willst dann so

Code:

Sub WilliHorstLeeren()
Range("Willi").ClearContents
Range("Horst").ClearContents
End Sub

[vision]

Jetzt funktioniert es  :28:

An alle Beteiligten den aller besten Dank für Eure Zeit und Hilfe   :23:

Viele Grüße
Thorsten :43: