Hoe voeg ik een nieuw werkblad toe met de huidige datum in Excel?
Sommige financiële en verkoopmedewerkers moeten mogelijk elke dag een nieuw werkblad met de huidige datum invoegen voor de statistieken van het dagelijkse werk. Als u een nieuw werkblad invoegt en het vervolgens handmatig hernoemt, zal het omslachtig zijn. Vandaag zal ik u enkele snelle trucs voorstellen om met dit probleem om te gaan.
Voeg een nieuw werkblad toe met de huidige datum met behulp van VBA-code
Voeg nieuwe werkbladen met opeenvolgende datum toe met behulp van Kutools voor Excel
Voeg een nieuw werkblad toe met de huidige datum met behulp van VBA-code
De volgende VBA-code helpt u om een nieuw werkblad in te voegen met de huidige datum wanneer u de code elke dag uitvoert.
1. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic for Applications-venster.
2. Klikken Invoegen > Moduleen plak de volgende macro in het Module venster.
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 F5 toets om deze code uit te voeren, en een nieuw blad met de datum van vandaag is ingevoegd na bestaande werkbladen. Zie screenshot:
Note: Wanneer u deze werkmap opslaat en sluit, dient u deze op te slaan als Excel-werkmap met ingeschakelde macro's formaat door te klikken Dien in > Opslaan als. En als u de werkmap de volgende dag start, moet u klikken Inhoud aanzetten, zodat u de code met succes kunt uitvoeren om een nieuw datumwerkblad toe te voegen.
Voeg nieuwe werkbladen met opeenvolgende datum toe met behulp van Kutools voor Excel
De bovenstaande code kan u helpen bij het invoegen van slechts één werkblad met de huidige dagdatum tegelijk, als u meerdere werkbladen met opeenvolgende datum wilt invoegen, dit hulpprogramma Maak reekswerkbladen of Kutools for Excel zal je een plezier doen.
Kutools for Excel bevat meer dan 300 handige Excel-tools. Gratis te proberen zonder beperking binnen 30 dagen. Get it Now.
Als je Kutools voor Excel hebt geïnstalleerd, doe dan het volgende:
1. Voer in een lege cel de datum van vandaag in en sleep vervolgens de vulgreep om de cellen met de datumvolgorde te vullen zoals je nodig hebt.
2. Dan klikken Enterprise > Werkbladhulpmiddelen > Maak reekswerkbladen, zie screenshot:
3. In de Maak reekswerkbladen dialoogvenster, specificeert u een werkblad waarop u de nieuwe bladen wilt baseren Basis werkblad keuzelijst. En selecteer vervolgens Gegevens in een bereik optie onder Bladnamen gebaseerd op sectie om een gegevensbereik te selecteren dat u als bladnamen wilt gebruiken. Zie screenshot:
4. Dan klikken OK, en er wordt een nieuwe werkmap gemaakt met de bladnamen in de datumvolgorde. Zie screenshot:
Om meer te weten over deze functie Create Sequence Worksheets.
Gerelateerd artikel:
Hoe maak je reekswerkbladen uit een reeks cellen in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!