Obsah
V tomto článku vám ukážu, jak můžete získat aktuální datum v aplikaci VBA v aplikaci Excel. Naučíte se zobrazovat aktuální datum, zobrazovat aktuální čas a také formátovat datum a čas v požadovaném formátu.
Jak získat aktuální datum ve VBA (rychlé zobrazení)
Stáhnout cvičebnici
Stáhněte si tento cvičební sešit a procvičte si tento úkol při čtení tohoto článku.
Získání aktuálních dat ve VBA.xlsm3 způsoby získání aktuálního data ve VBA
Podívejme se na nejlepší způsoby, jak získat aktuální datum a čas v aplikaci Makro na adrese VBA .
1. Získání aktuálního data pomocí funkce Date ve VBA
Nejdříve se podívejme, jak můžeme získat aktuální datum. Aktuální datum můžete získat v položce VBA poměrně komplexně pomocí Funkce data z VBA .
Řádek kódu bude:
Current_Date=Date()
Kompletní kód pro zobrazení aktuálního data bude:
⧭ Kód VBA:
Sub Get_Current_Date() Current_Date = Date MsgBox Current_Date End Sub
Poznámka: Tento kód vytvoří Makro s názvem Get_Current_Date .
⧭ Výstup:
Spusťte toto makro , a získáte Pole pro zprávy zobrazení aktuálního data, 11-Jan-22 .
Další informace: Jak vložit aktuální datum v aplikaci Excel
2. Vložení aktuálního data a času pomocí funkce Now jazyka VBA
Můžete použít Nyní funkce VBA získat aktuální datum spolu s aktuálním časem.
Řádek kódu bude:
Current_Date_and_Time = Now()
Proto je kompletní kód pro zobrazení aktuálního data a času:
⧭ Kód VBA:
Sub Get_Current_Date_and_Time() Current_Date_and_Time = Now() MsgBox Current_Date_and_Time End Sub
Poznámka: Tento kód vytvoří Makro s názvem Získat_aktuální_datum_a_čas .
⧭ Výstup:
Spusťte tento Makro , a získáte Pole pro zprávy zobrazení aktuálního data a času, 11-Jan-22 11:23:20 AM .
Další informace: Funkce Now a Format v aplikaci Excel VBA
Podobná čtení
- Proměnná data v kódech VBA (7 použití maker s příklady)
- Jak používat zkratku data aplikace Excel
- Výpočet data splatnosti pomocí vzorce v aplikaci Excel (7 způsobů)
- Jak používat vzorec IF s daty (6 jednoduchých příkladů)
3. Formátování aktuálního data a času pomocí funkce Formátování VBA
Doposud jsme se učili získávat aktuální datum a čas. Tentokrát se podíváme, jak můžeme zobrazit datum a čas v požadovaném formátu.
3.1 Formátování aktuálního data
Nejprve naformátujeme pouze aktuální datum.
Použijeme Formát funkce VBA k tomuto účelu. syntaxe funkce je:
=Format(Date,Format)
Chcete-li tedy zobrazit aktuální datum ve formátu dd/mm/rrrr , řádek kódu bude:
Current_Date = Format(Date, "dd/mm/rrrr")
A kompletní Kód VBA bude:
⧭ Kód VBA:
Sub Format_Date_and_Time() Current_Date = Format(Date, "dd/mm/rrrr") MsgBox Current_Date End Sub
Poznámka: Tento kód vytvoří Makro s názvem Format_Date_and_Time .
⧭ Výstup:
Pokud spustíte tento kód, zobrazí se aktuální datum v požadovaném formátu, dd/mm/rrrr , 11/01/2022 .
3.2 Formátování aktuálního data a času
Můžete také použít Formát pro formátování aktuálního data a aktuálního času dohromady.
Zobrazíme aktuální datum a čas ve formátu dd/mm/rrrr hh:mm:ss am/pm .
Řádek kódu bude:
Current_Date_and_Time = Format(Now(), "dd/mm/yyyy hh:mm:ss am/pm")
A kompletní Kód VBA bude:
⧭ Kód 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
Poznámka: Tento kód vytvoří Makro s názvem Format_Date_and_Time .
⧭ Výstup:
Pokud spustíte tento kód, zobrazí se aktuální datum a čas v požadovaném formátu, dd/mm/rrrr hh:mm:ss am/pm , 11/01/2022 12:03:45 .
Další informace: Jak formátovat datum pomocí VBA v aplikaci Excel
Souhrn
- Na stránkách TEĎ funkce Aplikace Visual Basic vrátí aktuální datum a čas.
- Na stránkách Datum vrátí aktuální datum.
- Na stránkách Formát zobrazí datum a čas v libovolném formátu.
Závěr
Pomocí těchto metod můžete získat a zobrazit aktuální datum a čas v položce Makro Máte nějaké dotazy? Neváhejte se nás zeptat.