Hoe voegt u een knop toe om specifieke cellen in Excel te wissen?
Normaal gesproken houdt u de Ctrl-toets ingedrukt om meerdere specifieke cellen te selecteren en vervolgens de celinhoud naar wens te wissen. Als u deze cellen regelmatig moet leegmaken, kunt u een wis-knop maken waarmee u ze in één klik kunt wissen. In dit artikel leg ik uit hoe u een ‘Alles wissen’-knop maakt om bepaalde celinhoud te verwijderen.
Een knop toepassen om specifieke celinhoud te wissen met VBA-code
Een knop toepassen om specifieke celinhoud te wissen met VBA-code
Eerst maakt u een vormknop aan, vervolgens past u code toe en koppelt u die uiteindelijk aan de vormknop. Volg hiervoor de onderstaande stappen:
1. Klik op Invoegen > Vormen > Rechthoeken om de rechthoekvorm te selecteren en sleep vervolgens met de muis om een rechthoekige knop op het werkblad te tekenen op de gewenste plek. Zie de schermafbeelding:

2. Voer daarna de gewenste tekst in en pas de opmaak van de vormknop naar wens aan. Zie de schermafbeelding:

3. Vervolgens voegt u de VBA-code in. Druk hiervoor op ALT + F11 om het venster Microsoft Visual Basic for Applications te openen. Klik op Invoegen > Module en plak de volgende code in het Module-venster.
Sub Clearcells()
'Updateby Extendoffice
Range("A2", "A5").Clear
Range("C10", "D18").Clear
Range("B8", "B12").Clear
End Sub
Opmerking: In de bovenstaande code geven A2:A5 aan dat alle cellen in het bereik A2:A5 worden gewist, niet alleen twee afzonderlijke cellen. U kunt ook meerdere bereiken wissen door bijvoorbeeld het script Range("B8", "B12").Clear aan de code toe te voegen.
4. Sluit vervolgens het codevenster via Opslaan en sluiten en koppel de code aan de vormknop. Klik met de rechtermuisknop op de knop en selecteer Macro toewijzen. In het dialoogvenster Macro toewijzen kiest u de codenaam Clearcells uit het keuzelijstvak Macronaam en klikt u op de knop OK om dit dialoogvenster te sluiten. Zie de schermafbeelding:

5. Vanaf nu worden de door u gedefinieerde specifieke cellen direct gewist zodra u op de knop Alles wissen klikt. Zie de schermafbeelding:

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