KutoolsforOffice — Eén oplossing, vijf krachtige tools.Meer bereiken met minder moeite.

Hoe wist u bepaalde celinhoud automatisch bij het openen en sluiten van een Excel-werkboek?

AuteurSiluvia Wijzigingsdatum

In dit artikel leest u hoe u specifieke celinhoud automatisch wist bij het openen of sluiten van een Excel-werkboek.

Wis bepaalde celinhoud bij openen en afsluiten van werkmap


Wis bepaalde celinhoud bij openen en afsluiten van werkmap

Volg de onderstaande stappen om specifieke celinhoud automatisch te wissen bij het openen en sluiten van de werkmap.

Sla eerst de werkmap op die u wilt gebruiken om bepaalde celinhoud te wissen bij het openen of afsluiten, als een macro-inschakelbare Excel-werkmap.

1. Klik op Bestand > Opslaan als > Bladeren. Zie schermafbeelding:

klik op Bestand > Opslaan als > Bladeren

2. In het dialoogvenster Opslaan als, kiest u een locatie om de werkmap op te slaan, voert u een nieuwe naam in het vak Bestandsnaam in zoals gewenst, selecteert u Excel-macro-inschakelbare werkmap in de lijst Opslaan als type en klikt u vervolgens op de knop Opslaan.

geef een bestandsnaam op en selecteer Excel-werkmap met macro's ingeschakeld in het dialoogvenster

3. In het verschijnende dialoogvenster Microsoft Excel klikt u op de knop OK, zoals hieronder in de schermafbeelding is weergegeven.

klik op OK in het waarschuwingsvenster

4. Open de macro-inschakelbare werkmap die u zojuist hebt opgeslagen en druk op de toetsencombinatie Alt+F11 om het venster Microsoft Visual Basic for Applications te openen.

5. Dubbelklik in het venster Microsoft Visual Basic for Applications in het linkerdeelvenster op DezeWerkmap en kopieer vervolgens de onderstaande VBA-code naar het codovenster.

VBA-code 1: Wis bepaalde celinhoud bij openen van werkmap

Private Sub Workbook_Open()
'Updated by Extendoffice 20190712
    Application.EnableEvents = False
        Worksheets("test").Range("A1:A11").Value = ""
    Application.EnableEvents = True
End Sub

VBA-code 2: Wis bepaalde celinhoud bij afsluiten van werkmap

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updated by Extendoffice 20190712
    Worksheets("test").Range("A1:A11").Value = ""
End Sub

Opmerking: In de bovenstaande codes zijn „test” en A1:A11 respectievelijk de werkbladnaam en het celbereik waarvan u de inhoud wilt wissen. Pas deze aan naar wens.

6. Druk op de toetsencombinatie Alt+Q om het venster Microsoft Visual Basic for Applications te sluiten.

Vanaf nu wordt de inhoud van bepaalde cellen in een specifiek werkblad automatisch gewist zodra u de werkmap opent of sluit.

een screenshot van kutools for excel ai

Ontgrendel de magie van Excel met KUTOOLS AI

  • Slimme uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak grafieken — allemaal met eenvoudige opdrachten.
  • aangepaste formules: Genereer op maat gemaakte formules om uw workflows te stroomlijnen.
  • VBA-programmeren: Schrijf en implementeer VBA-code moeiteloos.
  • Formule-uitleg: Begrijp complexe formules moeiteloos.
  • Tekstvertaling: Doorbreek taalbarrières in uw spreadsheets.
Breid uw Excel-mogelijkheden uit met AI-gestuurde tools.Download nuen ervaar efficiëntie zoals nooit tevoren!

Gerelateerde artikelen:

Beste Office-productiviteitshulpmiddelen

🤖KUTOOLS AI Assistant: Revolutioneer Data-analyse op basis van:Intelligente uitvoering   |  Genereer code|  Maak aangepaste formules  |  Analyseer gegevens en genereer grafieken|  Roep Verbeterde functies aan
Populaire functies:Zoeken, markeren of Dubbele waarden markeren   |  Verwijder lege rijen   |  Kolommen samenvoegen of cellen zonder gegevensverlies   |   Afronden zonder formule...
Super ZOEKEN:VLookup met meerdere criteria  |  VLookup met meerdere waarden  |   VLookup over meerdere werkbladen   |   Fuzzy Match....
Geavanceerde keuzelijst:Snel een keuzelijst maken   |  Afhankelijke keuzelijst   |  Keuzelijst met meervoudige selectie....
Kolombeheerder:Voeg een specifiek aantal kolommen toe|Verplaats kolommen|Wissel zichtbaarheidsstatus van verborgen kolommen|Vergelijk bereiken en kolommen...
Uitgelichte functies:Rasterfocus   |  Ontwerpweergave   |Verbeterde formulebalk   | Werkmap- en bladbeheerder   |  Bronnenbibliotheek(Automatische tekst)|  Datumkiezer   |  Werkbladen samenvoegen  |  Versleutelen/Cellen decoderen   | E-mails verzenden op basis van lijst   |  Superfilter   |   Speciaal filter(Filter cellen met vetgedrukt lettertype/cursief/doorgestreept...) ...
Top 15 gereedschapssets:12 Teksthulpmiddelen(Tekst toevoegen,Specifieke tekens verwijderen, ...)|   50+Grafiektypen(Gantt-diagram, ...)|   40+ Praktische formules(Leeftijd berekenen op basis van geboortedatum, ...)|   19 Invoeghulpmiddelen(QR-code Invoegen,Afbeelding invoegen vanaf pad, ...)|   12 Conversiehulpmiddelen(Omzetten naar woorden,Wisselkoersconversie, ...)|   7 Samenvoegen en splitsenhulpmiddelen(Geavanceerd samenvoegen van rijen,Cellen splitsen, ...)|... en meer
Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en 40+ andere talen!

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.

ExcelWordOutlookTabsPowerPoint
  • 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