Kako pridobiti trenutni datum v programu VBA (3 načini)

  • Deliti To
Hugh West

V tem članku vam bom pokazal, kako lahko dobite trenutni datum v VBA v Excelu. Naučili se boste prikazati trenutni datum, prikazati trenutni čas ter formatirati datum in čas v želeni obliki.

Kako pridobiti trenutni datum v programu VBA (hitri prikaz)

Prenesi delovni zvezek za prakso

Prenesite to vadbeno knjigo in med branjem tega članka izvajajte nalogo.

Pridobivanje trenutnih datumov v VBA.xlsm

3 načini pridobivanja trenutnega datuma v VBA

Preučimo najboljše načine za pridobitev trenutnega datuma in časa v Makro na spletnem mestu VBA .

1. Pridobite trenutni datum s funkcijo Date v programu VBA

Najprej si oglejmo, kako lahko dobimo trenutni datum. Trenutni datum lahko dobite v VBA precej izčrpno z uporabo Funkcija datuma na spletnem mestu . VBA .

Vrstica kode bo:

Current_Date=Date()

Celotna koda za prikaz trenutnega datuma je:

Koda VBA:

 Sub Get_Current_Date() Current_Date = Date MsgBox Current_Date End Sub 

Opomba: Ta koda ustvari Makro . Get_Current_Date .

Izhod:

Zaženite ta makro program in dobili boste Polje za sporočila prikaže trenutni datum, 11-Jan-22 .

Preberite več: Kako vstaviti trenutni datum v Excel

2. Vstavite trenutni datum in čas s funkcijo Now v VBA

Uporabite lahko Zdaj funkcijo VBA za pridobitev trenutnega datuma in trenutnega časa.

Vrstica kode bo:

Current_Date_and_Time = Now()

Zato je celoten koda za prikaz trenutnega datuma in časa:

Koda VBA:

 Sub Get_Current_Date_and_Time() Current_Date_and_Time = Now() MsgBox Current_Date_and_Time End Sub 

Opomba: Ta koda ustvari Makro . Get_Current_Date_and_Time .

Izhod:

Zaženite to Makro in dobili boste Polje za sporočila prikaže trenutni datum in čas, 11-Jan-22 11:23:20 AM .

Preberite več: Funkcije Now in Format v Excelu VBA

Podobna branja

  • Spremenljivka datuma v kodah VBA (7 uporab makrov s primeri)
  • Kako uporabljati bližnjico za datum v Excelu
  • Izračunajte datum zapadlosti s formulo v Excelu (7 načinov)
  • Kako uporabiti formulo IF z datumi (6 enostavnih primerov)

3. Oblikovanje trenutnega datuma in časa s funkcijo Format v VBA

Do zdaj smo se naučili pridobiti trenutni datum in čas. Tokrat si oglejmo, kako lahko datum in čas prikažemo v želeni obliki.

3.1 Oblikovanje trenutnega datuma

Najprej bomo oblikovali samo trenutni datum.

Uporabili bomo Format funkcijo VBA v ta namen. sintaksa funkcije je:

=Format(Datum,Format)

Če želite prikazati trenutni datum v obliki dd/mm/rrrr , vrstica kode bo:

Current_Date = Format(Date, "dd/mm/yyyy")

In celoten Koda VBA bo:

Koda VBA:

 Sub Format_Date_and_Time() Current_Date = Format(Date, "dd/mm/yyyy") MsgBox Current_Date End Sub 

Opomba: Ta koda ustvari Makro . Format_Date_and_Time .

Izhod:

Če zaženete to kodo, bo prikazan trenutni datum v želeni obliki, dd/mm/rrrr , 11/01/2022 .

3.2 Oblikovanje trenutnega datuma in časa

Uporabite lahko tudi Format za skupno oblikovanje trenutnega datuma in trenutnega časa.

Prikažimo trenutni datum in čas v obliki dd/mm/rrrr hh:mm:ss am/pm .

Vrstica kode bo:

Trenutni_datum_in_čas = Format(Now(), "dd/mm/yyyy hh:mm:ss am/pm")

In celoten Koda VBA bo:

Koda VBA:

 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 

Opomba: Ta koda ustvari Makro . Format_Date_and_Time .

Izhod:

Če zaženete to kodo, bo prikazala trenutni datum in čas v želeni obliki, dd/mm/rrrr hh:mm:ss am/pm , 11/01/2022 12:03:45 .

Preberite več: Kako oblikovati datum z VBA v Excelu

Povzetek

  • Spletna stran ZDAJ funkcijo Aplikacija Visual Basic vrne trenutni datum in čas.
  • Spletna stran Datum funkcija vrne trenutni datum.
  • Spletna stran Format funkcija prikaže datum in čas v poljubnem formatu.

Zaključek

S temi metodami lahko dobite in prikažete trenutni datum in čas v Makro v Excelu. Imate kakšno vprašanje? Vprašajte nas.

Hugh West je zelo izkušen trener Excela in analitik z več kot 10-letnimi izkušnjami v industriji. Po izobrazbi je diplomirani računovodstvo in finance ter magisterij poslovne administracije. Hugh ima strast do poučevanja in je razvil edinstven pristop k poučevanju, ki ga je enostavno slediti in razumeti. Njegovo strokovno znanje o Excelu je pomagalo na tisoče študentom in strokovnjakom po vsem svetu, da so izboljšali svoje sposobnosti in se izkazali v karieri. Prek svojega bloga Hugh deli svoje znanje s svetom, ponuja brezplačne vadnice za Excel in spletno usposabljanje, ki posameznikom in podjetjem pomaga doseči njihov polni potencial.