Funkcia Excel VBA Now
TERAZ je funkcia dátumu a času v obidvoch VBA, ktorá sa používa na získanie aktuálneho systémového dátumu a času, rovnako ako funkcia pracovného hárka, ktorá v nej neberie žiadne argumenty, vo VBA teraz funkcia tiež neberie žiadne argumenty, návratový výstup pre túto funkciu je dátum.
Funkcia VBA NOW je podobná funkcii v hárku programu Excel. Rovnako ako funkcia DATE vo VBA „NOW“ nemá parametre, ktoré by bolo treba odovzdať, stačí, keď odovzdáme funkciu s uzavretou zátvorkou alebo tiež bez zátvoriek. Použitím funkcie DATE vo VBA môžeme vygenerovať aktuálny dátum ako ukazujúci systém, na ktorom pracujeme. Videl som však situácie, keď potrebujeme aktuálny čas aj s dátumom. V programe Excel môžeme robiť mnoho druhov vecí, podobne môžeme generovať aktuálny dátum a čas pomocou jednoduchej funkcie s názvom NOW in Excel.
Vzorec VBA NOW je jednoduchý.
TERAZ ()
Príklad funkcie NOW v programe VBA Excel
Pozrite sa na jednoduchý príklad funkcie NOW vo VBA. Podľa nasledujúcich pokynov napíšete kód VBA a budete mať teraz dostatok znalostí o písaní kódu a tiež písaní kódu.
Krok 1: Začnite podproces zadaním názvu makra.
Kód:
Sub Now_Example1 () End Sub
Krok 2: Deklarujte premennú ako „Dátum“. Dôvod, prečo musíme deklarovať premennú ako „Dátum“, pretože náš konečný výsledok je vo formáte dátumu a času.
Kód:
Sub Now_Example1 () Dim k As Date End Sub
Krok 3: Priraďte hodnotu premennej „k“ pomocou funkcie VBA NOW.
Kód:
Sub Now_Example1 () Dim k As Date k = Now End Sub
Krok 4: Teraz v okne správy vo VBA ukážte hodnotu funkcie TERAZ, ktorú sme priradili premennej „k“.
Kód:
Sub Now_Example1 () Dim k As Date k = Now MsgBox k End Sub
Dobre, skončili sme.
Spustite kód pomocou klávesu F5 alebo ručne a uvidíte, aký je výsledok.
Výsledok sa ukáže 15. 4. 2019 o 5:03:35 hod.
Formát dátumu môjho počítača je „mm-dd-rrrr“.
Formát dátumu môžeme zmeniť aj pomocou funkcie FORMAT. Nižšie je uvedený kód na zmenu formátu dátumu.
Kód:
Sub Now_Example1 () Dim k As Date k = Now Format MsgBox (k, "DD-MMM-YYYY HH: MM: SS") End Sub
Spustite kód a uvidíte rozdiel.
Teraz máme správny formát dátumu a času. V tomto formáte môže ktokoľvek rozumieť formátu dátumu a času.
Prchavé v prírode:
Ako vidíte v prvom príklade, časový výsledok sme dostali ako 5:03:35 a v druhom príklade ideme ako 17:19:02. To teda ukazuje, že funkcia NOW je volatilná funkcia, ktorá sa mení každú sekundu.
Alternatíva k funkcii časovača vo VBA
Ako alternatívu k VBA TIMER môžeme pomocou funkcie „VBA NOW“ vypočítať celkový čas potrebný na vykonanie úlohy makrom.
Pomocou nižšie uvedeného kódu vypočítajte čas, ktorý váš kód vyžaduje.
C0de:
Sub TotalDuration () Dim k As Date k = Now '' 'Sem zadajte váš kód' '' MsgBox "Celkový čas potrebný na splnenie úlohy makrom je:" & _ Format ((Now - k), "HH: MM : SS ") End Sub
Skopírujte a vložte svoj kód do zeleno označenej oblasti.
Vykonajte kód stlačením klávesu F5 alebo stlačením tlačidla spustenia. Hneď ako dokončí vykonávanie, dostaneme čas, ktorý makro potrebuje na dokončenie správy o úlohe v okne správy. Nižšie je uvedený príklad toho istého.
Takto môžeme vo VBA použiť funkciu NOW mnohými spôsobmi.
Túto šablónu funkcií VBA Now pre Excel VBA si môžete stiahnuť tu - Šablónu funkcií VBA Now