Časová funkcia VBA Príklady použitia časovej funkcie programu Excel VBA

Časová funkcia programu Excel VBA

Funkcia VBA Time vracia aktuálny čas. Je tiež potrebné poznamenať, že táto funkcia v sebe nemá vôbec žiadne argumenty. Ďalším dôležitým faktorom, ktorý si treba pamätať, je, že táto funkcia vracia aktuálny systémový čas. Pomocou tejto funkcie môžeme skutočne zistiť skutočný čas potrebný na dokončenie procesu v rade kódov.

TIME je druh volatilnej funkcie, nemá k nej žiadnu syntax.

Podobnú funkciu máme aj v programe Excel - funkciu NOW (), ktorá do tabuľky vloží ako aktuálne časy, tak aj aktuálny dátum.

TIME ()

Potrebujeme iba zadať funkciu, v skutočnosti nie je potrebné vložiť zátvorky, aby ste vložili iba ČAS, aby ste vložili aktuálny čas. Výsledok daný funkciou TIME je v reťazci.

Ako používať funkciu TIME vo VBA?

Ukážem vám príklad jednoduchej funkcie TIME v programe Excel. Podľa nasledujúcich pokynov vytvorte kód na použitie funkcie TIME.

Túto šablónu časových funkcií VBA si môžete stiahnuť tu - Šablóna časových funkcií VBA

Krok 1: Vytvorte makro.

Kód:

 Sub Time_Example1 () End Sub 

Krok 2: Deklarujte premennú ako reťazec.

Kód:

 Sub Time_Example1 () Dim CurrentTime ako String End Sub 

Krok 3: Priraďte tejto premennej hodnotu pomocou funkcie TIME.

Kód:

 Sub Time_Example1 () Dim CurrentTime ako reťazec CurrentTime = Čas na konci Sub 

Krok 4: Teraz zobrazte výsledok v okne správy.

Kód:

 Sub Time_Example1 () Dim CurrentTime ako reťazec CurrentTime = čas MsgBox CurrentTime End Sub 

Spustite tento kód pomocou klávesu F5 alebo manuálne dostaneme aktuálny čas.

Takže keď spustím tento kód, čas bol 11.51.54 AM.

Alternatíva funkcie Now ()

Kombinácia dátumu a času ako alternatíva k funkcii TERAZ

Ako som povedal na začiatku článku, TERAZ môžete vložiť aktuálny dátum a čas. Môžeme však použiť dve ďalšie funkcie ako alternatívu k funkcii HNED, tieto dve funkcie sú VBA DATE a VBA TIME.

Dátum VBA vráti aktuálny dátum & Čas vráti aktuálny čas, takže je to funkcia NOW. Ďalej je uvedená sada kódov, ktorá vloží aktuálny dátum a čas do bunky A1.

Kód:

 Sub Time_Example2 () Range ("A1"). Value = Date & "" & Time End Sub 

Tento kód vloží aktuálny dátum a čas do bunky A1.

Na tieto hodnoty môžeme tiež použiť formát pomocou funkcie FORMAT. Nasledujúci kód bude formátovať dátum a čas.

Kód:

 Sub Time_Example2 () Range ("A1"). Value = Date & "" & Time Range ("A1"). NumberFormat = "dd-mmm-yyyy hh: mm: ss AM / PM" End Sub 

Výsledok tohto kódu je teraz nasledovný.

Sledujte svoje otvorené zošity pomocou časovej funkcie vo VBA

Často musíme poznať čas a frekvenciu otvárania nášho zošita. Nastala situácia, že zošit otvárame pomerne často a robíme nejaké zmeny. Sledovaním času a dátumu otvorenia zošita môžeme sledovať čas otvorenia zošita.

Vytvorte nový hárok a premenujte ho ako „Sledovať hárok“.

Krok 1: Dvakrát kliknite na tento zošit z editora VBE.

Step 2: Select the workbook from the object drop-down list.

Step 3: As soon as you select this option you can see new macro automatically created by itself in the name “Workbook_Open()”.

Step 4: Inside this macro, we will need to write a code to track the workbook opening date & time.

I have already written code and below is the code for you.

Code:

 Private Sub Workbook_Open() Dim LR As Long LR = Sheets("Track Sheet").Cells(Rows.Count, 1).End(xlUp).Row + 1 Sheets("Track Sheet").Cells(LR, 1).Value = Date & " " & Time() Sheets("Track Sheet").Cells(LR, 1).NumberFormat = "dd-mmm-yyyy hh:mm:ss AM/PM" End Sub 

This will record your workbook opening times like the below one.