Wie kann man schnell alle Inhalte entsperrter / ungeschützter Zellen in Excel löschen?
Wenn Sie ein Arbeitsblatt haben, das einen Teil der nicht gesperrten Zellen enthält, und jetzt möchten Sie alle Inhalte der nicht gesperrten Zellen auf einmal löschen. Haben Sie Lösungen für diese Aufgabe?
Löschen Sie alle Inhalte entsperrter Zellen mit der Funktion Suchen und Ersetzen
Löschen Sie den gesamten Inhalt entsperrter Zellen mit VBA-Code
Löschen Sie alle Inhalte entsperrter Zellen mit Kutools for Excel
Löschen Sie alle Inhalte entsperrter Zellen mit der Funktion Suchen und Ersetzen
Um alle Werte ungeschützter Zellen zu löschen, können Sie mit der Funktion Suchen und Ersetzen zuerst die entsperrten Zellen auswählen und dann sofort löschen.
1. Öffnen Sie Ihr Arbeitsblatt, in dem Sie die entsperrten Zellen löschen möchten, und klicken Sie auf Home > Suchen & Auswählen > Finden Sie oder drücken Sie die Tastenkombinationen - Strg + F Schlüssel zum Öffnen der Suchen und Ersetzen Dialog, siehe Screenshot:
2. In dem Suchen und Ersetzen Dialogfeld, klicken Sie auf Optionen Schaltfläche zum Erweitern des Dialogfelds, siehe Screenshot:
3. Dann klick Format Knopf und a Format suchen Das Dialogfeld wird angezeigt und dann unter Schutz Tab, deaktivieren Verschlossen und versteckt Boxen, siehe Screenshot:
4. Klicken Sie OK zurück zum Suchen und Ersetzen Dialogfeld, dann klicken Sie auf Finde alle Klicken Sie auf die Schaltfläche, alle ungeschützten Zellen werden im folgenden Listenfeld angezeigt, und drücken Sie dann Strg + A Um alle auszuwählen, siehe Screenshot:
5. Und dann schließen Sie diese Suchen und Ersetzen Im Dialogfeld wurden alle entsperrten Zellen im aktuellen Arbeitsblatt ausgewählt. Siehe Screenshot:
6. Dann müssen Sie nur noch drücken Löschen Taste auf der Tastatur, und der ausgewählte entsperrte Zelleninhalt wird sofort entfernt.
Löschen Sie den gesamten Inhalt entsperrter Zellen mit VBA-Code
Der folgende VBA-Code kann Ihnen auch dabei helfen, den Inhalt der entsperrten Zellen zu löschen. Gehen Sie dazu folgendermaßen vor:
1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen-Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.
VBA-Code: Löschen Sie den gesamten Inhalt entsperrter Zellen
Sub ClearUnlockedCells()
'Updateby20140724
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. Dann drücken F5 Geben Sie die Taste ein, um diesen Code auszuführen, und geben Sie einen Bereich an, in dem Sie den Inhalt der entsperrten Zellen im ausgeblendeten Feld entfernen möchten. Siehe Screenshot:
4. Klicken Sie OKund der Inhalt in Zellen des nicht gesperrten Bereichs wurde gelöscht.
Löschen Sie alle Inhalte entsperrter Zellen mit Kutools for Excel
Wenn Sie installiert haben Kutools for Excel, seine Wählen Sie Entsperrte Zellen Mit dieser Funktion können Sie zuerst die ungeschützten Zellen auswählen und sie dann sofort löschen.
Kutools for Excel Enthält mehr als 300 praktische Excel-Tools. Kostenlos ohne Einschränkung in 30 Tagen zu versuchen. Starten Sie jetzt
Führen Sie nach der Installation von Kutools for Excel die folgenden Schritte aus:
1. Wählen Sie den Datenbereich aus, in dem Sie den Inhalt der entsperrten Zelle löschen möchten.
2. Klicken Sie Kutoolen > Wählen Sie Extras > Wählen Sie Entsperrte Zellen, siehe Screenshot:
3. Alle freigeschalteten Zellen wurden in Ihrer Auswahl ausgewählt.
4. Drücken Sie Löschen Taste auf der Tastatur, um den ausgewählten Zelleninhalt sofort zu löschen.
Wenn Sie mehr über diese Funktion erfahren möchten, klicken Sie bitte auf Wählen Sie Entsperrte Zellen.
In Verbindung stehender Artikel:
Wie wähle ich alle entsperrten Zellen 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, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
