Satura rādītājs
Šajā rakstā es jums parādīšu, kā varat iegūt pašreizējo datumu programmā VBA programmā Excel. Jūs uzzināsiet, kā parādīt pašreizējo datumu, pašreizējo laiku, kā arī formatēt datumu un laiku vēlamajā formātā.
Pašreizējā datuma iegūšana VBA (ātrais skats)
Lejupielādēt Practice Workbook
Lejupielādējiet šo prakses grāmatu, lai izpildītu uzdevumu, kamēr lasāt šo rakstu.
Pašreizējo datumu iegūšana programmā VBA.xlsm3 veidi, kā VBA iegūt pašreizējo datumu
Izpētīsim labākos veidus, kā iegūt pašreizējo datumu un laiku lietojumprogrammā Makro vietnē VBA .
1. Pašreizējā datuma iegūšana ar VBA datuma funkciju
Vispirms aplūkosim, kā mēs varam iegūt pašreizējo datumu. Pašreizējo datumu var iegūt ar VBA diezgan visaptveroši, izmantojot Datuma funkcija no VBA .
Koda rinda būs šāda:
Current_Date=Date() Pilns kods, lai parādītu pašreizējo datumu, būs šāds:
⧭ VBA kods:
Sub Get_Current_Date() Current_Date = Date MsgBox Current_Date End Sub Piezīme: Šis kods izveido Makro ko sauc par Get_Current_Date .
⧭ Izvades rezultāts:
Palaist šo makro , un jūs saņemsiet Ziņu lodziņš rāda pašreizējo datumu, 11-Jan-22 .
Uzziniet vairāk: Kā programmā Excel ievietot pašreizējo datumu
2. Pašreizējā datuma un laika ievietošana, izmantojot VBA funkciju Now
Varat izmantot Tagad funkcija VBA lai iegūtu pašreizējo datumu un pašreizējo laiku.
Koda rinda būs šāda:
Current_Date_and_Time = Now() Tāpēc pilns kods lai parādītu pašreizējo datumu un laiku:
⧭ VBA kods:
Sub Get_Current_Date_and_Time() Current_Date_and_Time = Now() MsgBox Current_Date_and_Time End Sub Piezīme: Šis kods izveido Makro ko sauc par Get_Current_Date_and_Time .
⧭ Izvades rezultāts:
Palaist šo Makro , un jūs saņemsiet Ziņu lodziņš rāda pašreizējo datumu un laiku, 11-Jan-22 11:23:20 AM .
Uzziniet vairāk: Tagad un formatēšanas funkcijas programmā Excel VBA
Līdzīgi lasījumi
- Datuma mainīgais VBA kodos (7 makroekrānu lietojumi ar piemēriem)
- Kā lietot Excel datuma saīsnes
- Aprēķiniet termiņu ar formulu programmā Excel (7 veidi)
- Kā lietot IF formulu ar datumiem (6 vienkārši piemēri)
3. Pašreizējā datuma un laika formatēšana, izmantojot VBA formatēšanas funkciju
Līdz šim esam mācījušies iegūt pašreizējo datumu un laiku. Šoreiz apskatīsim, kā varam attēlot datumu un laiku vēlamajā formātā.
3.1 Pašreizējā datuma formatēšana
Vispirms formatēsim tikai pašreizējo datumu.
Mēs izmantosim Formāts funkcija VBA šim nolūkam. sintakse funkcija ir:
=Format(Date,Format) Tāpēc, lai parādītu pašreizējo datumu formātā dd/mm/gggggg , kods būs šāds:
Current_Date = Format(Date, "dd/mm/gggggg")
Un pilns VBA kods būs:
⧭ VBA kods:
Sub Format_Date_and_Time() Current_Date = Format(Date, "dd/mm/gggg") MsgBox Current_Date End Sub Piezīme: Šis kods izveido Makro ko sauc par Format_Date_and_Time .
⧭ Izvades rezultāts:
Ja palaidīsiet šo kodu, tiks parādīts pašreizējais datums vēlamajā formātā, dd/mm/gggggg , 11/01/2022 .
3.2 Pašreizējā datuma un laika formatēšana
Varat izmantot arī Formāts funkciju, lai formatētu pašreizējo datumu un pašreizējo laiku kopā.
Parādīsim pašreizējo datumu un laiku formātā dd/mm/gggggg hh:mm:ss am/pm .
Koda rinda būs šāda:
Current_Date_and_Time = Format(Now(), "dd/mm/yyyyyy hh:mm:ss am/pm") Un pilns VBA kods būs:
⧭ VBA kods:
Sub Format_Date_and_Time() Current_Date_and_Time = Format(Now(), "dd/mm/yyyyyy hh:mm:ss am/pm") MsgBox Current_Date_and_Time End Sub Piezīme: Šis kods izveido Makro ko sauc par Format_Date_and_Time .
⧭ Izvades rezultāts:
Ja palaidīsiet šo kodu, tiks parādīts pašreizējais datums un laiks vēlamajā formātā, dd/mm/gggggg hh:mm:ss am/pm , 11/01/2022 12:03:45 .
Uzziniet vairāk: Kā formatēt datumu ar VBA programmā Excel
Kopsavilkums
- Portāls TAGAD funkcija Visual Basic lietojumprogramma atgriež pašreizējo datumu un laiku.
- Portāls Datums funkcija atgriež pašreizējo datumu.
- Portāls Formāts funkcija parāda datumu un laiku jebkurā vēlamajā formātā.
Secinājums
Izmantojot šīs metodes, varat iegūt un parādīt pašreizējo datumu un laiku. Makro Vai jums ir kādi jautājumi? Uzdodiet tos mums.
