Hoe verwijdert u snel alle inhoud uit ontgrendelde of onbeschermde cellen in Excel?
Als uw werkblad een gedeelte bevat dat is ontgrendeld voor selectie en u nu in één keer alle inhoud van de ontgrendelde cellen wilt verwijderen, heeft u dan een oplossing voor deze taak?
Verwijder alle inhoud van Ontgrendel Selectie met de functie Zoeken en Vervangen
Verwijder alle inhoud van Ontgrendel Selectie met VBA-code
Verwijder alle inhoud van Ontgrendel Selectie met Kutools voor Excel
Verwijder alle inhoud van Ontgrendel Selectie met de functie Zoeken en Vervangen
Om alle waarden in onbeschermde cellen te wissen, gebruikt u de functie Zoeken en vervangen om eerst de ontgrendelde selectie te kiezen en deze vervolgens direct te verwijderen.
1. Open het werkblad waarvan u de ontgrendelde selectie wilt verwijderen en klik op Start > Zoeken en selecteren > Zoeken, of gebruik de sneltoets Ctrl + F om het dialoogvenster Zoeken en Vervangen te openen, zie schermafbeelding:
2. Klik in het dialoogvenster Zoeken en Vervangen op de knop Opties om het dialoogvenster uit te breiden, zie schermafbeelding:
3. Klik vervolgens op de knop Opmaak, waarna het dialoogvenster Zoekformaat verschijnt. Ga naar het tabblad Beveiliging en schakel de selectievakjes voor Vergrendeld en Verborgen uit, zie schermafbeelding:
4. Klik op OK om terug te keren naar het dialoogvenster Zoeken en Vervangen en klik vervolgens op de knop Alles zoeken. Alle onbeschermde cellen worden weergegeven in het onderstaande lijstvak. Druk daarna op Ctrl + A om ze allemaal te selecteren. Zie schermafbeelding:
5. Sluit vervolgens het dialoogvenster Zoeken en Vervangen; alle cellen met ‘Ontgrendel Selectie’ zijn nu geselecteerd in het huidige werkblad. Zie de schermafbeelding:
6. Druk vervolgens op de Delete-toets op het toetsenbord om de inhoud van de geselecteerde ontgrendelde cellen meteen te verwijderen.
Verwijder alle inhoud van Ontgrendel Selectie met VBA-code
De volgende VBA-code helpt u ook de inhoud van de selectie 'Ontgrendel' te wissen. Volg deze stappen:
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 Ontgrendel Selectie
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 toets F5 om deze code uit te voeren en geef in het pop-upvenster het bereik op waarvan u de inhoud van de Ontgrendel Selectie wilt verwijderen, zie schermafbeelding:
4. Klik op OK; de inhoud van de ontgrendelde cellen is nu gewist.
Verwijder alle inhoud van Ontgrendel Selectie met Kutools voor Excel
Als u Kutools voor Excel hebt geïnstalleerd, helpt de functie Selecteer niet-vergrendelde cellen u om eerst alle onbeschermde cellen te selecteren, zodat u ze daarna in één keer kunt verwijderen.
Kutools voor Excel bevat meer dan 300 handige Excel-hulpmiddelen. Probeer het gratis en zonder beperkingen gedurende 30 dagen.Download nu
Na installatie van Kutools voor Excel voert u de volgende stappen uit:
1.Selecteer het gegevensbereik waarvan u de inhoud van ontgrendelde cellen wilt wissen.
2. Klik op Kutools > Selecteren > Selecteer niet-vergrendelde cellen.
3. Alle opties onder ‘Ontgrendel Selectie’ zijn nu geselecteerd binnen uw selectie.
4. Druk op de Delete-toets op het toetsenbord om de inhoud van de geselecteerde cellen direct te verwijderen.
Wilt u meer weten over deze functie? Klik dan op Selecteer niet-vergrendelde cellen.
Gerelateerd artikel:
Hoe selecteert u alle Ontgrendel Selectie in Excel?
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins