Hoe snel alle inhoud van ontgrendelde / onbeschermde cellen in Excel verwijderen?
Als u een werkblad heeft dat een deel van de niet-vergrendelde cellen bevat, en nu wilt u alle ontgrendelde celinhoud in één keer verwijderen. Heeft u 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 onbeschermde cellen te wissen, kunt u de functie Zoeken en vervangen gebruiken om eerst de ontgrendelde cellen te selecteren en ze vervolgens onmiddellijk te verwijderen.
1. Open uw werkblad waarvan u de ontgrendelde cellen wilt verwijderen en klik op Home > Zoek en selecteer > VIND DE PLEK DIE PERFECT VOOR JOU IS of druk op sneltoetsen - Ctrl + F toetsen om de te openen Zoeken en vervangen dialoog, zie screenshot:
2. In de Zoeken en vervangen dialoogvenster, klik Opties knop om het dialoogvenster uit te vouwen, zie screenshot:
3. Dan klikken Formaat knop, en een Zoek opmaak dialoogvenster verschijnt en vervolgens onder Bescherming tab, verwijder het vinkje Vergrendeld en verborgen dozen, zie screenshot:
4. Klikken OK terugkeren naar de Zoeken en vervangen dialoogvenster en klik op Vind alle -knop, worden alle onbeschermde cellen weergegeven in de onderstaande keuzelijst en drukt u vervolgens op Ctrl + A zie screenshot om ze allemaal te selecteren:
5. En sluit dit dan af Zoeken en vervangen dialoogvenster zijn alle ontgrendelde cellen geselecteerd in het huidige werkblad, zie screenshot:
6. Dan hoeft u alleen maar op te drukken Verwijder toets op het toetsenbord, en de geselecteerde ontgrendelde celinhoud wordt in één keer 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 dit als volgt:
1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic for Applications-venster.
2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: verwijder alle inhoud van ontgrendelde cellen
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. Druk vervolgens op F5 sleutel om deze code uit te voeren, en geef een bereik op waarvan u de inhoud van de ontgrendelde cellen in het uitgeklapte vak wilt verwijderen, zie screenshot:
4. Klikken OKen de inhoud in cellen met een ontgrendeld bereik is gewist.
Verwijder alle inhoud van ontgrendelde cellen met Kutools voor Excel
Als je hebt geïnstalleerd Kutools for Excel, het is Selecteer Unlocked Cells functie kan u helpen om eerst de onbeschermde cellen te selecteren, en vervolgens kunt u ze meteen verwijderen.
Kutools for Excel bevat meer dan 300 handige Excel-tools. Gratis te proberen zonder beperking binnen 30 dagen. Get it Now
Voer de volgende stappen uit na het installeren van Kutools voor Excel:
1. Selecteer het gegevensbereik waarvan u de ontgrendelde celinhoud wilt wissen.
2. Klikken Kutools > Selecteer Tools > Selecteer Unlocked Cells, zie screenshot:
3. En alle ontgrendelde cellen zijn geselecteerd in uw selectie.
4. pers Verwijder toets op het toetsenbord om de geselecteerde celinhoud onmiddellijk te verwijderen.
Wilt u meer weten over deze functie, klik dan op Selecteer Unlocked Cells.
Gerelateerd artikel:
Hoe selecteer ik alle ontgrendelde cellen in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!