Wie löscht man schnell alle Inhalte entsperrter bzw. ungeschützter Zellen in Excel?
Wenn Sie ein Arbeitsblatt mit einem Bereich entsperrter Zellen haben und nun den gesamten Inhalt dieser entsperrten Zellen auf einmal löschen möchten – kennen Sie eine Lösung für diese Aufgabe?
Löschen Sie alle Inhalte von Auswahl entsperren mit der Suchen und Ersetzen-Funktion
Löschen Sie alle Inhalte von Auswahl entsperren mit VBA-Code
Löschen Sie alle Inhalte von Auswahl entsperren mit Kutools für Excel
Löschen Sie alle Inhalte von Auswahl entsperren mit der Suchen und Ersetzen-Funktion
Um alle Werte ungeschützter Zellen zu löschen, nutzen Sie einfach die Funktion „Suchen und Ersetzen“, um zunächst die Auswahl „Entsperren“ anzuwenden und diese anschließend sofort zu löschen.
1. Öffnen Sie das Arbeitsblatt, aus dem Sie die Auswahl entsperren und löschen möchten, und klicken Sie auf Start > Suchen und Auswählen > Suchen oder drücken Sie die Tastenkombination – Strg + F, um das Dialogfeld Suchen und Ersetzen zu öffnen (siehe Screenshot):
2. Klicken Sie im Dialogfeld Suchen und Ersetzen auf die Schaltfläche Optionen, um das Dialogfeld zu erweitern (siehe Screenshot):
3. Klicken Sie dann auf die Schaltfläche Format, woraufhin das Dialogfeld Format suchen geöffnet wird. Deaktivieren Sie unter dem Reiter Schutz die Kontrollkästchen Gesperrt und Ausgeblendet (siehe Screenshot):
4. Klicken Sie auf OK, um zum Dialogfeld Suchen und Ersetzen zurückzukehren, und anschließend auf die Schaltfläche Alle suchen. Alle ungeschützten Zellen werden in der Liste unten angezeigt – drücken Sie dann Strg + A, um alle auszuwählen (siehe Screenshot):
5. Schließen Sie anschließend das Dialogfeld Suchen und Ersetzen. Alle zuvor gesperrten Zellen sind nun im aktuellen Arbeitsblatt ausgewählt (siehe Screenshot):
6. Drücken Sie nun einfach die Entf-Taste auf Ihrer Tastatur, und die Inhalte der ausgewählten entsperrten Zellen werden sofort gelöscht.
Löschen Sie alle Inhalte von Auswahl entsperren mit VBA-Code
Der folgende VBA-Code hilft Ihnen ebenfalls dabei, die Inhalte der markierten Zellen zu löschen und deren Schutz aufzuheben. Gehen Sie dazu wie folgt vor:
1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic für Applikationen zu öffnen.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code im Modulfenster ein.
VBA-Code: Löschen Sie alle Inhalte von Auswahl entsperren
Sub ClearUnlockedCells()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each Rng In WorkRng
If Rng.Locked = False Then Rng.ClearContents
Next
Application.ScreenUpdating = True
End Sub
3. Drücken Sie anschließend die Taste F5, um diesen Code auszuführen, und geben Sie im erscheinenden Dialogfeld den Bereich an, dessen Inhalte Sie entsperren und löschen möchten (siehe Screenshot):
4. Klicken Sie auf OK, und die Inhalte der entsperrten Zellen werden gelöscht.
Löschen Sie alle Inhalte von Auswahl entsperren mit Kutools für Excel
Wenn Sie Kutools für Excel installiert haben, unterstützt Sie dessen Funktion Nicht gesperrte Zellen auswählen dabei, zunächst alle ungeschützten Zellen auszuwählen, sodass Sie diese anschließend auf einmal löschen können.
Kutools für Excel bietet über 300 praktische Excel-Werkzeuge – testen Sie es jetzt kostenlos und ohne Einschränkungen für 30 Tage!Jetzt herunterladen
Nach der Installation von Kutools für Excel gehen Sie bitte wie folgt vor:
1. Wählen Sie den Datenbereich aus, dessen Inhalte in entsperrten Zellen Sie löschen möchten.
2. Klicken Sie auf Kutools > Auswählen > Nicht gesperrte Zellen auswählen.
3. Alle zuvor gesperrten Elemente innerhalb Ihrer Auswahl wurden nun entsperrt und markiert.
4. Drücken Sie die Entf-Taste auf Ihrer Tastatur, um die Inhalte der ausgewählten Zellen sofort zu löschen.
Wenn Sie mehr über diese Funktion erfahren möchten, klicken Sie bitte auf Nicht gesperrte Zellen auswählen.
Verwandter Artikel:
Wie wählt man alle Auswahl entsperren in Excel aus?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins