Cuprins
În acest articol, vă voi arăta cum puteți obține data curentă în VBA în Excel. Veți învăța să afișați data curentă, să afișați ora curentă, precum și să formatați data și ora în formatul dorit.
Cum să obțineți data curentă în VBA (Vizualizare rapidă)
Descărcați caietul de practică
Descărcați această carte de practică pentru a vă exersa sarcina în timp ce citiți acest articol.
Obțineți datele curente în VBA.xlsm3 moduri de a obține data curentă în VBA
Să explorăm cele mai bune moduri de a obține data și ora curentă într-un fișier Macro în VBA .
1. Obțineți data curentă cu ajutorul funcției Date din VBA
Mai întâi de toate, să vedem cum putem obține data curentă. Puteți obține data curentă în VBA destul de cuprinzător, folosind Funcția Data de VBA .
Linia de cod va fi:
Current_Date=Date() Codul complet pentru a afișa data curentă va fi:
⧭ Cod VBA:
Sub Get_Current_Date() Current_Date = Date MsgBox Current_Date End Sub Notă: Acest cod creează un fișier Macro numit Get_Current_Date .
⧭ Ieșire:
Rulați acest macro , și veți primi un Caseta de mesaje afișarea datei curente, 11-ian-22 .
Citiți mai mult: Cum se inserează data curentă în Excel
2. Introduceți data și ora curentă prin funcția Now din VBA
Puteți utiliza funcția Acum funcția de VBA pentru a obține data curentă împreună cu ora curentă.
Linia de cod va fi:
Current_Date_and_Time = Now() Prin urmare, întregul cod pentru a afișa data și ora curentă:
⧭ Cod VBA:
Sub Get_Current_Date_and_Time() Current_Date_and_Time = Now() MsgBox Current_Date_and_Time End Sub Notă: Acest cod creează un fișier Macro numit Get_Current_Date_and_Time .
⧭ Ieșire:
Rulați acest Macro , și veți primi un Caseta de mesaje afișarea datei și a orei curente, 11-Jan-22 11:23:20 AM .
Citiți mai mult: Funcțiile Now și Format în Excel VBA
Lecturi similare
- Variabila dată în codurile VBA (7 utilizări ale macrourilor cu exemple)
- Cum se utilizează Excel Data Shortcut
- Calculați data scadenței cu o formulă în Excel (7 moduri)
- Cum se utilizează formula IF cu date (6 exemple simple)
3. Formatarea datei și orei curente cu ajutorul funcției Format din VBA
Până acum, am învățat să obținem data și ora curentă. De data aceasta, să vedem cum putem afișa data și ora în formatul dorit.
3.1 Formatarea datei curente
Mai întâi, vom formata doar data curentă.
Vom folosi Format funcția de VBA în acest scop. sintaxă a funcției este:
=Format(Data,Format) Prin urmare, pentru a afișa data curentă în formatul dd/mm/aaaa , linia de cod va fi:
Current_Date = Format(Date, "dd/mm/aaaa")
Și complet Cod VBA va fi:
⧭ Cod VBA:
Sub Format_Date_and_Time() Current_Date = Format(Date, "dd/mm/yyyy") MsgBox Current_Date End Sub Notă: Acest cod creează un fișier Macro numit Format_Date_și_Ora .
⧭ Ieșire:
Dacă rulați acest cod, se va afișa data curentă în formatul dorit, dd/mm/aaaa , 11/01/2022 .
3.2 Formatarea datei și orei curente
De asemenea, puteți utiliza și funcția Format pentru a formata împreună data și ora curentă.
Să afișăm data și ora curentă în formatul dd/mm/aaaa hh:mm:ss am/pm .
Linia de cod va fi:
Current_Date_and_Time = Format(Now(), "dd/mm/yyyy hh:mm:ss am/pm") Și complet Cod VBA va fi:
⧭ Cod 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 Notă: Acest cod creează un fișier Macro numit Format_Date_și_Ora .
⧭ Ieșire:
Dacă rulați acest cod, acesta va afișa data și ora curentă în formatul dorit, dd/mm/aaaa hh:mm:ss am/pm , 11/01/2022 12:03:45 pm .
Citiți mai mult: Cum să formatați data cu VBA în Excel
Rezumat
- The ACUM funcția de Aplicație Visual Basic returnează data și ora curente.
- The Data returnează data curentă.
- The Format funcția afișează o dată și o oră în orice format dorit.
Concluzie
Folosind aceste metode, puteți obține și afișa data și ora curentă într-un fișier Macro Dacă aveți întrebări, nu ezitați să ne întrebați.
