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?