Maak een lege werkmap met behulp van een macro en maak er een werkblad in met de huidige datum als naam
Wilt u een macro gebruiken om een werkmap te maken die precies één werkblad bevat met de huidige datum als naam?
Zo'n macro is handig als je bijvoorbeeld regelmatig bepaalde gegevens moet invoeren en jezelf de moeite van het maken van de werkmap wilt besparen. Gebruik de volgende Excel-macro voor deze taak:
Sub CreateActualDateTable ()
Application.DisplayAlerts = False
Met werkmappen.Toevoegen
While .Worksheets.Count> 1
.Werkbladen (1) .Verwijderen
Wend
.Werkbladen (1) .Naam = Datum
Eindigt met
Application.DisplayAlerts = True
Einde sub
Na het starten maakt Excel een nieuwe, lege werkmap aan. Op één blad na worden alle bladen in deze map verwijderd. De macro geeft dan het resterende werkblad de huidige datum als een naam.
De volgende afbeelding laat zien hoe het resultaat eruit kan zien:
Om de macro in te voeren, drukt u in Excel op de toetscombinatie ALT F11. Dit roept de VBA-editor op. Gebruik de opdracht INSERT - MODULE om een leeg moduleblad in te voegen. Om de macro te starten, drukt u in Excel op de toetscombinatie ALT F8.
