Indholdsfortegnelse
I denne artikel vil jeg vise dig, hvordan du kan få den aktuelle dato i VBA Du lærer at vise den aktuelle dato, vise det aktuelle klokkeslæt og formatere dato og klokkeslæt i det ønskede format.
Sådan får du den aktuelle dato i VBA (Quick View)
Download arbejdsbog til øvelser
Download denne øvelsesbog for at øve dig i opgaven, mens du læser denne artikel.
Hent aktuelle datoer i VBA.xlsm3 måder at få den aktuelle dato på i VBA
Lad os undersøge de bedste måder at få den aktuelle dato og tid på i en Makro på VBA .
1. Få den aktuelle dato ved hjælp af VBA-funktionen Date
Lad os først og fremmest se, hvordan vi kan få den aktuelle dato. Du kan få den aktuelle dato i VBA ret omfattende ved hjælp af Datofunktion på VBA .
Koderækken vil være:
Current_Date=Date()
Den komplette kode til visning af den aktuelle dato vil være:
⧭ VBA-kode:
Sub Get_Current_Date() Current_Date = Date MsgBox Current_Date End Sub
Bemærk: Denne kode opretter en Makro kaldet Hent_Current_Date .
⧭ Output:
Kør denne makro , og du får en Meddelelsesboks viser den aktuelle dato, 11-jan-22 .
Læs mere: Sådan indsætter du aktuel dato i Excel
2. Indsæt aktuel dato og tid ved hjælp af Nu-funktionen i VBA
Du kan bruge Nu funktion af VBA for at få den aktuelle dato sammen med det aktuelle klokkeslæt.
Koderækken vil være:
Current_Date_and_Time = Now()
Derfor skal den fuldstændige kode for at vise den aktuelle dato og klokkeslæt:
⧭ VBA-kode:
Sub Get_Current_Date_and_Time() Current_Date_and_Time = Now() MsgBox Current_Date_and_Time End Sub
Bemærk: Denne kode opretter en Makro kaldet Hent_aktuel_dato_og_tid .
⧭ Output:
Kør dette Makro , og du får en Meddelelsesboks viser den aktuelle dato og det aktuelle klokkeslæt, 11-Jan-22 11:23:20 AM .
Læs mere: Nu og Format-funktioner i Excel VBA
Lignende læsninger
- Datovariabel i VBA-koder (7 anvendelser af makroer med eksempler)
- Sådan bruger du Excel Dato-genvej
- Beregn forfaldsdato med formel i Excel (7 måder)
- Sådan bruger du IF-formlen med datoer (6 nemme eksempler)
3. Formater aktuel dato og tid ved hjælp af formatfunktionen i VBA
Indtil nu har vi lært at hente den aktuelle dato og klokkeslæt. Denne gang skal vi se, hvordan vi kan vise dato og klokkeslæt i det ønskede format.
3.1 Formater aktuel dato
Først formaterer vi kun den aktuelle dato.
Vi bruger den Format funktion af VBA til dette formål. syntaks af funktionen er:
=Format(Dato,Format)
For at vise den aktuelle dato i formatet dd/mm/åååå , vil kodelinjen være:
Current_Date = Format(Dato, "dd/mm/åååå")
Og den komplette VBA-kode vil være:
⧭ VBA-kode:
Sub Format_Date_and_Time() Current_Date = Format(Date, "dd/mm/yyyy") MsgBox Current_Date End Sub
Bemærk: Denne kode opretter en Makro kaldet Format_Date_and_Time .
⧭ Output:
Hvis du kører denne kode, viser den den aktuelle dato i det ønskede format, dd/mm/åååå , 11/01/2022 .
3.2 Formater aktuel dato og tid
Du kan også bruge Format funktionen til at formatere den aktuelle dato og det aktuelle klokkeslæt sammen.
Lad os vise den aktuelle dato og klokkeslæt i formatet dd/mm/ååååå hh:mm:ss am/pm .
Koderækken vil være:
Current_Date_and_Time = Format(Now(), "dd/mm/yyyy hh:mm:ss am/pm")
Og den komplette VBA-kode vil være:
⧭ VBA-kode:
Sub Format_Date_and_Time() Current_Date_and_Time = Format(Now(), "dd/mm/yyyy hh:mm:ss am/pm") MsgBox Current_Date_and_Time End Sub
Bemærk: Denne kode opretter en Makro kaldet Format_Date_and_Time .
⧭ Output:
Hvis du kører denne kode, vises den aktuelle dato og klokkeslæt i det format, du ønsker, dd/mm/ååååå hh:mm:ss am/pm , 11/01/2022 12:03:45 pm .
Læs mere: Sådan formaterer du datoer med VBA i Excel
Resumé
- NU funktion af Visual Basic-applikation returnerer den aktuelle dato og det aktuelle klokkeslæt.
- Dato funktionen returnerer den aktuelle dato.
- Format funktionen viser dato og klokkeslæt i et vilkårligt format.
Konklusion
Ved hjælp af disse metoder kan du hente og vise den aktuelle dato og det aktuelle klokkeslæt i en Makro i Excel. Har du spørgsmål, er du velkommen til at stille dem til os.