online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon dieter2000 vom 22.12.2019, 10:22 Options

inTabelle die freien Zellen löschen

Hallo
meinProblem ist folgendes
ich möchte in einer Tabelle alle Daten in allen Tabellenblättern in den nicht gesperrten Zellen löschen.
Gibt es vieleicht ein Makro dazu?

Danke im vorraus
und ein frohes Fest wünscht Dieter


Antwort schreiben

Antwort 1 von Beverly vom 22.12.2019, 10:59 Options

Hi Dieter,

eine Möglichkeit
Sub loeschen()
    Dim wsTabelle As Worksheet
    Dim raZelle As Range
    For Each wsTabelle In ThisWorkbook.Worksheets
        For Each raZelle In wsTabelle.UsedRange
            If raZelle.Locked = False Then raZelle.ClearContents
        Next raZelle
    Next wsTabelle
End Sub


Bis später,
Karin

Ähnliche Themen

in excel zellen verbinden, ohne inhalte zu löschen
mafug  21.09.2007 - 272 Hits - 1 Antwort

Zellen nach gleichem Text überprüfen
Prain  04.10.2007 - 127 Hits - 9 Antworten

per VBA in EXCEL Buchstaben löschen
sven0207  19.10.2007 - 113 Hits - 7 Antworten

Makro-bestimmt Zellen löschen
musiker021  06.05.2008 - 87 Hits - 3 Antworten

Zeilen mit leeren Zellen löschen
brs  16.06.2008 - 300 Hits - 7 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Thu Jan 8 21:07:44 2026