Hoe voeg je een nieuw werkblad toe met de huidige datum in Excel?

Sommige financiële en verkoopmedewerkers moeten mogelijk elke dag een nieuw werkblad invoegen met de huidige datum voor de statistieken van het dagelijkse werk. Als je handmatig een nieuw werkblad invoegt en dit vervolgens hernoemt, kan dat omslachtig zijn. Vandaag zal ik je enkele snelle trucs laten zien om dit probleem op te lossen.

Voeg een nieuw werkblad toe met de huidige datum door VBA-code te gebruiken

Voeg nieuwe werkbladen toe met opeenvolgende datums door Kutools voor Excel te gebruiken

Voeg een nieuw werkblad toe met de huidige datum door VBA-code te gebruiken

De volgende VBA-code helpt je om een nieuw werkblad met de huidige datum in te voegen wanneer je de code elke dag uitvoert.

1. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.

2. Klik op Invoegen > Module, en plak de volgende macro in het modulevenster.

VBA-code: Voeg een nieuw werkblad toe met de huidige datum

Sub AddSheets_TodayDate()
'Updateby20140717
    Dim szTodayDate As String
    szTodayDate = Format(Date, "mmm-dd-yyyy")
    On Error GoTo MakeSheet
    Sheets(szTodayDate).Activate
    Exit Sub
MakeSheet:
    Sheets.Add , Worksheets(Worksheets.Count)
    ActiveSheet.Name = szTodayDate
End Sub

3. Druk vervolgens op de F5-toets om deze code uit te voeren, en er is een nieuw blad met vandaag's datum ingevoegd na de bestaande werkbladen. Zie screenshot:

Opmerking: Wanneer je deze werkmap opslaat en sluit, sla deze dan op als Excel Macro-Enabled Workbook-formaat door te klikken op Bestand > Opslaan als. En wanneer je de werkmap de volgende dag opent, zorg er dan voor dat je op Inhoud inschakelen klikt, zodat je de code succesvol kunt uitvoeren om een nieuw datumwerkblad toe te voegen.

Voeg nieuwe werkbladen toe met opeenvolgende datums door Kutools voor Excel te gebruiken

De bovenstaande code kan je helpen om slechts één werkblad met de huidige datum tegelijk in te voegen. Als je meerdere werkbladen met opeenvolgende datums wilt invoegen, zal deze functie Werkbladen met reeks maken van Kutools voor Excel je een handje helpen.

Kutools voor Excel bevat meer dan 300 handige Excel-tools. Gratis te proberen zonder beperking gedurende 30 dagen. Download het nu.

Als je Kutools voor Excel hebt geïnstalleerd, doe dan het volgende:

1. Voer in een lege cel vandaag's datum in en sleep vervolgens het vulhandvat om de cellen te vullen met de datumreeks zoals je nodig hebt.

2. Klik vervolgens op Kutools Plus > Werkblad > Werkbladen met reeks maken.

3. Specificeer in het dialoogvenster Werkbladen met reeks maken een werkblad waarop de nieuwe bladen gebaseerd moeten zijn via de vervolgkeuzelijst Gebaseerd op werkblad. Selecteer vervolgens de optie Gegevens binnen selectie onder de sectie Werkbladnaam gebaseerd op om een gegevensbereik te selecteren dat je wilt gebruiken als de namen van de werkbladen. Zie screenshot:

4. Klik vervolgens op OK, en er wordt een nieuwe werkmap gemaakt met de namen van de werkbladen als datumreeks. Zie screenshot:

Om meer te weten te komen over deze functie Werkbladen met reeks maken.

Gerelateerd artikel:

Hoe maak je werkbladen met reeksen aan vanuit een bereik van cellen in Excel?