Hoe een knop toe te passen om specifieke cellen in Excel te wissen?
Normaal gesproken kunt u de Ctrl-toets ingedrukt houden om meerdere specifieke cellen te selecteren en vervolgens de inhoud van de cellen wissen zoals u nodig hebt. Als u regelmatig deze specifieke cellen moet wissen, kunt u een wis-knop maken om ze met één klik te wissen. In dit artikel zal ik bespreken hoe u een 'Alles wissen'-knop maakt om de inhoud van sommige specifieke cellen te wissen.
Een knop toepassen om specifieke celinhoud te wissen met VBA-code
Een knop toepassen om specifieke celinhoud te wissen met VBA-code
Eerst moet u een vormknop maken, vervolgens een code toepassen en tot slot de code aan de vormknop koppelen. Volg hiervoor de volgende stappen:
1. Klik op Invoegen > Vormen > Rechthoeken om de rechthoekvorm te selecteren, en sleep vervolgens de muis om een rechthoekknop ergens op het werkblad te tekenen, indien nodig. Zie onderstaande schermafbeelding:
2. Voer vervolgens de tekst in en formatteer de vormknop zoals u nodig hebt. Zie onderstaande schermafbeelding:
3. Vervolgens moet u de VBA-code invoegen. Houd hiervoor de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen. Klik op Invoegen > Module, en plak de volgende code in het modulevenster.
Sub Clearcells()
'Updateby Extendoffice
Range("A2", "A5").Clear
Range("C10", "D18").Clear
Range("B8", "B12").Clear
End Sub
Opmerking: In bovenstaande code: A2,A5 geven aan dat het de cellen in het bereik A2:A5 zal wissen, niet alleen de twee cellen afzonderlijk. U kunt ook meerdere bereiken toevoegen, zoals Bereik("B8", "B12").Wissen script binnen de code om te wissen.
4. Sla daarna het codevenster op en sluit het, en koppel vervolgens de code aan de vormknop. Klik met de rechtermuisknop op de knop en selecteer Macro toewijzen. Selecteer in het dialoogvenster Macro toewijzen de codenaam Clearcells uit de lijst met macronamen en klik op de knop OK om dit dialoogvenster te verlaten. Zie onderstaande schermafbeelding:
5. En nu, wanneer u op de knop Alles wissen klikt, worden de specifieke cellen die u heeft gedefinieerd onmiddellijk gewist. Zie onderstaande schermafbeelding:
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