Wie kann man schnell alle Inhalte von entsperrten/ungeschützten Zellen in Excel löschen?
Wenn Sie ein Arbeitsblatt haben, das eine Reihe von entsperrten Zellen enthält, und Sie möchten nun alle Inhalte der entsperrten Zellen auf einmal löschen. Haben Sie Lösungen, um diese Aufgabe zu bewältigen?
Löschen Sie alle Inhalte der entsperrten Zellen mit der Funktion „Suchen und Ersetzen“
Löschen Sie alle Inhalte der entsperrten Zellen mit VBA-Code
Löschen Sie alle Inhalte der entsperrten Zellen mit Kutools für Excel
Löschen Sie alle Inhalte der entsperrten Zellen mit der Funktion „Suchen und Ersetzen“
Um alle Werte der ungeschützten Zellen zu löschen, können Sie die Funktion „Suchen und Ersetzen“ verwenden, um zuerst die entsperrten Zellen auszuwählen und sie dann sofort zu löschen.
1. Öffnen Sie Ihr Arbeitsblatt, in dem Sie die entsperrten Zellen 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, und es wird ein Dialogfeld „Suchformat“ geöffnet. Gehen Sie dann zum Register Schutz und deaktivieren Sie die Kontrollkästchen Gesperrt und Ausgeblendet, siehe Screenshot:
4. Klicken Sie auf OK, um zum Dialogfeld „ Suchen und Ersetzen“ zurückzukehren, dann auf die Schaltfläche Alle suchen. Alle ungeschützten Zellen werden in der unteren Listenbox angezeigt, und dann drücken Sie Strg + A, um alle auszuwählen, siehe Screenshot:
5. Schließen Sie dann dieses Dialogfeld „Suchen und Ersetzen“. Alle entsperrten Zellen wurden im aktuellen Arbeitsblatt ausgewählt, siehe Screenshot:
6. Drücken Sie einfach die Entf-Taste auf der Tastatur, und die ausgewählten Inhalte der entsperrten Zellen werden sofort entfernt.
Löschen Sie alle Inhalte der entsperrten Zellen mit VBA-Code
Der folgende VBA-Code kann Ihnen auch helfen, die Inhalte der entsperrten Zellen zu löschen. Bitte gehen Sie wie folgt vor:
1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code in das Modulfenster ein.
VBA-Code: Löschen Sie alle Inhalte der entsperrten Zellen
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 dann die Taste F5, um diesen Code auszuführen, und geben Sie einen Bereich an, aus dem Sie die Inhalte der entsperrten Zellen im aufgetauchten Fenster entfernen möchten, siehe Screenshot:
4. Klicken Sie auf OK, und die Inhalte in den entsperrten Zellen des Bereichs wurden gelöscht.
Löschen Sie alle Inhalte der entsperrten Zellen mit Kutools für Excel
Wenn Sie Kutools für Excel installiert haben, kann dessen Funktion „Nicht gesperrte Zellen auswählen“ Ihnen helfen, zuerst die ungeschützten Zellen auszuwählen, und dann können Sie diese auf einmal löschen.
Kutools für Excel umfasst mehr als 300 praktische Excel-Tools. Kostenlos 30 Tage lang ohne Einschränkungen testen. Jetzt herunterladen
Nach der Installation von Kutools für Excel gehen Sie bitte wie folgt vor:
1. Wählen Sie den Datenbereich aus, in dem Sie die Inhalte der entsperrten Zellen löschen möchten.
2. Klicken Sie auf Kutools > Auswählen > Nicht gesperrte Zellen auswählen.
3. Und alle entsperrten Zellen wurden in Ihrer Auswahl ausgewählt.
4. Drücken Sie die Entf-Taste auf der Tastatur, um die ausgewählten Zelleninhalte 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 entsperrten Zellen in Excel aus?
Beste Büroproduktivitätswerkzeuge
Verbessern Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt eine Registerkartenoberfläche zu Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie die Bearbeitung und das Lesen mit Registerkarten in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters, anstatt in neuen Fenstern.
- Steigert Ihre Produktivität um50 % und reduziert täglich hunderte von Mausklicks für Sie!