Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1396to1400
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Alle nicht gesperrten Zellen löschen

Alle nicht gesperrten Zellen löschen
24.12.2014 15:33:23
Bernhard
Hallo VBA-Experten,
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

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle nicht gesperrten Zellen löschen
24.12.2014 15:41:27
hary
Moin
Du meinst Inhalt loeschen?
Dim Zelle As Range
For Each Zelle In Sheets("Tabelle1").Range("A1:G5") '---Blattname anpassen
If Zelle.Locked = False Then Zelle.ClearContents
Next Zelle

gruss hary

AW: Alle nicht gesperrten Zellen löschen
24.12.2014 15:43:39
Bernhard
Ja, ich meine Inhalt löschen.
Vielen Dank Harry. Ich glaube das passt für mich.
LG Bernhard
Anzeige

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige