Hoe kan ik snel alle inhoud van ontgrendelde / onbeveiligde cellen in Excel verwijderen?
Als u een werkblad heeft dat een deel ontgrendelde cellen bevat, en u wilt nu alle inhoud van de ontgrendelde cellen tegelijk verwijderen. Heeft u enige oplossingen om met deze taak om te gaan?
Verwijder alle inhoud van ontgrendelde cellen met de functie Zoeken en Vervangen
Verwijder alle inhoud van ontgrendelde cellen met VBA-code
Verwijder alle inhoud van ontgrendelde cellen met Kutools voor Excel
Verwijder alle inhoud van ontgrendelde cellen met de functie Zoeken en Vervangen
Om alle waarden van onbeveiligde cellen te wissen, kunt u de functie Zoeken en Vervangen gebruiken om eerst de ontgrendelde cellen te selecteren en deze vervolgens direct te verwijderen.
1. Open uw werkblad waarvan u de ontgrendelde cellen wilt verwijderen, en klik op Start > Zoeken en selecteren > Zoeken of druk op de sneltoetsen - Ctrl + F om het dialoogvenster Zoeken en vervangen te openen, zie screenshot:
2. Klik in het dialoogvenster Zoeken en vervangen op de knop Opties om het dialoogvenster uit te vouwen, zie screenshot:
3. Klik vervolgens op de knop Opmaak, en er verschijnt een dialoogvenster Zoekopmaak. Ga vervolgens naar het tabblad Beveiliging en vink de vakjes Vergrendeld en Verborgen uit, zie screenshot:
4. Klik op OK om terug te keren naar het dialoogvenster Zoeken en vervangen, en klik vervolgens op de knop Alles zoeken. Alle onbeveiligde cellen worden weergegeven in de lijstbox hieronder, en druk vervolgens op Ctrl + A om ze allemaal te selecteren, zie screenshot:
5. Sluit vervolgens dit dialoogvenster Zoeken en vervangen, en alle ontgrendelde cellen zijn geselecteerd in het huidige werkblad, zie screenshot:
6. Druk vervolgens gewoon op de Delete-toets op het toetsenbord, en de geselecteerde inhoud van de ontgrendelde cellen wordt onmiddellijk verwijderd.
Verwijder alle inhoud van ontgrendelde cellen met VBA-code
De volgende VBA-code kan u ook helpen om de inhoud van de ontgrendelde cellen te wissen, doe het volgende:
1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Invoegen > Module, en plak de volgende code in het modulevenster.
VBA-code: Verwijder alle inhoud van ontgrendelde cellen
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. Druk vervolgens op de F5-toets om deze code uit te voeren, en geef een bereik op waarvan u de inhoud van de ontgrendelde cellen wilt verwijderen in het pop-upvenster, zie screenshot:
4. Klik op OK, en de inhoud van de ontgrendelde cellen in het bereik is gewist.
Verwijder alle inhoud van ontgrendelde cellen met Kutools voor Excel
Als u Kutools voor Excel hebt geïnstalleerd, kan de functie Selecteer Ontgrendelde Cellen u helpen om eerst de onbeveiligde cellen te selecteren, en vervolgens kunt u ze in één keer verwijderen.
Kutools voor Excel omvat meer dan 300 handige Excel-tools. Gratis proberen zonder beperking gedurende 30 dagen. Download het nu
Nadat u Kutools voor Excel hebt geïnstalleerd, volg dan de volgende stappen:
1. Selecteer het gegevensbereik waarvan u de inhoud van de ontgrendelde cellen wilt wissen.
2. Klik op Kutools > Selecteer > Selecteer Ontgrendelde Cellen.
3. En alle ontgrendelde cellen zijn geselecteerd in uw selectie.
4. Druk op de Delete-toets op het toetsenbord om de geselecteerde celinhoud onmiddellijk te verwijderen.
Als u meer wilt weten over deze functie, klik dan op Selecteer Ontgrendelde Cellen.
Gerelateerd artikel:
Hoe selecteer je alle ontgrendelde cellen in Excel?
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen