Hvordan legge til nye regneark med dagens dato i Excel?

The følgende VBA-kode vil hjelpe deg å sette inn et nytt regneark med dagens dato når du kjører koden hver dag.
1. Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications Window.
2. Klikk Sett > Modul, og lim inn følgende makro i modulen vindu
VBA-kode. Legg et nytt regneark med dagens dato
Sub AddSheets_TodayDate () 'Updateby20140717 Dim szTodayDate As String szTodayDate = Format (dato, "mmm-dd-åååå ") On Error GoTo MakeSheet Sheets (szTodayDate) .Activate Exit SubMakeSheet: Sheets.Add, regneark (Worksheets.Count) ActiveSheet.Name = szTodayDateEnd Sub3. Deretter trykker du F5 for å kjøre denne koden, og et nytt ark med dagens dato har blitt satt inn etter eksisterende regneark. Se skjermbilde:
Merk: Når du lagrer og lukker denne arbeidsboken, kan du lagre det som Excel Macro-Enabled arbeidsbok format ved å klikke Fil > Lagre som. Og når du starter arbeidsboken neste dag, sørg klikker du Aktiver innhold, slik at du kan kjøre kode for å legge til nye datoen regneark.

Legg til nye regneark med sekvensiell dato ved hjelp Kutools for Excel
koden ovenfor kan hjelpe deg med å sette inn bare ett regneark med gjeldende dag dato på en gang, hvis du vil sette inn flere regneark med sekvensiell dato, dette verktøyet Lag Sequence regneark av Kutools for Excel vil gjøre deg en tjeneste.
Kutools for Excel inneholder mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. Få den nå
Hvis du har installert Kutools for Excel, kan du gjøre som følger:.
1. I en tom celle, vennligst skriv dagens dato, og deretter drar du fyllhåndtaket til å fylle cellene med datoen sekvens som du trenger.
To. Klikk deretter på Enterprise > Regneark Verktøy > Opprett Sequence regneark, se skjermbilde:
tre. I Opprett Sequence regneark dialogboksen angir et regneark som du vil at nye ark basert på fra Base regneark nedtrekkslisten. Og deretter Data i en rekke alternativ under skjema navn basert på avsnittet til å velge et dataområde som du ønsker å bruke som plate navn. Se skjermbilde:
4. Klikk deretter på OK, og en ny arbeidsbok vil bli opprettet med plate navnene er dato rekkefølge. Se skjermbilde:
å vite mer om dette Lag Sequence regneark funksjonen
.