Si të merrni datën aktuale në VBA (3 mënyra)

  • Shperndaje Kete
Hugh West

Në këtë artikull, unë do t'ju tregoj se si mund të merrni datën aktuale në VBA në Excel. Ju do të mësoni të tregoni datën aktuale, të tregoni kohën aktuale, si dhe të formatoni datën dhe orën në formatin tuaj të dëshiruar.

Si të merrni datën aktuale në VBA (Shikje e shpejtë)

Shkarkoni Librin e Punës Praktike

Shkarkoni këtë libër praktik për të ushtruar detyrën ndërsa jeni duke lexuar këtë artikull.

Merrni datat aktuale në VBA.xlsm

3 mënyra për të marrë datën aktuale në VBA

Le të eksplorojmë mënyrat më të mira për të marrë datën aktuale data dhe ora në një Makro VBA .

1. Merrni datën aktuale sipas funksionit të datës së VBA

Së pari, le të shohim se si mund ta marrim datën aktuale. Ju mund ta merrni datën aktuale në VBA në mënyrë të plotë duke përdorur funksionin Data VBA .

Rreshti i kodit do të jetë:

Current_Date=Date()

Kodi i plotë për të shfaqur datën aktuale do të jetë:

Kodi VBA:

3718

Shënim: Ky kod krijon një Makro të quajtur Get_Current_Date .

Prodhimi:

Ekzekutoni këtë makro dhe do të merrni një Kuti mesazhi që shfaq data aktuale, 11-22 janar .

Lexo më shumë: Si të futni datën aktuale në Excel

2. Fut datën dhe orën aktuale sipas funksionit Tani të VBA

Mund të përdorësh funksionin Tani VBA për të marrëdata aktuale së bashku me kohën aktuale.

Rreshti i kodit do të jetë:

Current_Date_and_Time = Now()

Prandaj, kodi i plotë për të shfaqur datën dhe orën aktuale do të jetë:

Kodi VBA:

4077

Shënim: Kjo kodi krijon një Makro të quajtur Get_Current_Date_and_Time .

Output:

Ekzekutoni këtë Makro dhe do të merrni një Kuti mesazhesh që shfaq datën dhe orën aktuale, 11-22 janar 11:23:20 .

Lexo më shumë: Tani dhe Formati Funksionet në Excel VBA

Lexime të ngjashme

  • Ndryshorja e datës në kodet VBA (7 përdorime të makrove me shembuj)
  • Si të përdorni shkurtoren e datës në Excel
  • Llogaritni datën e duhur me Formulën në Excel (7 mënyra)
  • Si të përdorni formularin IF me data (6 shembuj të thjeshtë)

3. Formatoni datën dhe kohën aktuale sipas funksionit të formatit të VBA

Deri më tani, ne kemi mësuar të marrim datën dhe orën aktuale. Këtë herë, le të shohim se si mund të shfaqim datën dhe orën në formatin tonë të dëshiruar.

3.1 Formati i datës aktuale

Së pari, do të formatojmë vetëm datën aktuale .

Ne do të përdorim funksionin Format VBA për këtë qëllim. sintaksa e funksionit është:

=Format(Date,Format)

Prandaj, për të shfaqur datën aktuale në formatin dd/mm/vvvv , rreshti i kodit do të jetë:

Data_aktuale = Format(Data,“dd/mm/vvvv”)

Dhe i plotë kodi VBA do të jetë:

Kodi VBA:

7321

Shënim: Ky kod krijon një Makro të quajtur Format_Date_and_Time .

Prodhimi:

Nëse e përdorni këtë kod, ai do të tregojë datën aktuale në formatin tuaj të dëshiruar, dd/mm/vvvv , 11/01/2022 .

3.2 Formatoni datën dhe kohën aktuale

Ju mund të përdorë gjithashtu funksionin Format për të formatuar datën aktuale dhe kohën aktuale së bashku.

Le të shfaqim datën dhe kohën aktuale në formatin dd/mm/vvvvv hh:mm :ss am/pm .

Rreshti i kodit do të jetë:

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

Dhe i plotë kodi VBA do të jetë:

Kodi VBA:

8651

Shënim: Ky kod krijon një Makro i quajtur Format_Date_and_Time .

Output:

Nëse ju ekzekutoni këtë kod, ai do të tregojë datën dhe orën aktuale në formatin tuaj të dëshiruar, dd/mm/vvvvvv hh:mm:ss am/pm , 11/01/2022 12:03:45 pasdite .

Lexo më shumë: Si të formatoni datën me VBA në Excel

Përmbledhje

  • TANI funksioni i Aplikacionit Visual Basic kthen datën dhe orën aktuale.
  • Funksioni Data kthen datën aktuale.
  • Formati Funksioni shfaq një datë dhe orë në çdo format të dëshiruar.

Përfundim

Duke përdorur këto metoda, mund të merrni dhe të shfaqnidata dhe ora aktuale në një Makro në Excel. A keni ndonjë pyetje? Mos ngurroni të na pyesni.

Hugh West është një trajner dhe analist me përvojë të lartë në Excel me mbi 10 vjet përvojë në industri. Ai ka një diplomë Bachelor në Kontabilitet dhe Financë dhe një Master në Administrim Biznesi. Hugh ka një pasion për mësimdhënien dhe ka zhvilluar një qasje unike të mësimdhënies që është e lehtë për t'u ndjekur dhe kuptuar. Njohuritë e tij eksperte të Excel-it kanë ndihmuar mijëra studentë dhe profesionistë në mbarë botën të përmirësojnë aftësitë e tyre dhe të shkëlqejnë në karrierën e tyre. Nëpërmjet blogut të tij, Hugh ndan njohuritë e tij me botën, duke ofruar mësime falas në Excel dhe trajnime në internet për të ndihmuar individët dhe bizneset të arrijnë potencialin e tyre të plotë.