VBA Časovna funkcija - Examlpes za uporabo časovne funkcije Excel VBA

Funkcija Excel VBA Time

Funkcija VBA Time vrne trenutni čas, pri čemer je pomembno omeniti, da ta funkcija nima nobenih argumentov, še en pomemben dejavnik, ki si ga je treba zapomniti, je, da ta funkcija vrne trenutni sistemski čas. Z uporabo te funkcije lahko dejansko najdemo dejanski čas, ki ga potrebuje vrstica kod za dokončanje postopka.

ČAS je neke vrste spremenljiva funkcija. Nima nobene sintakse.

Podobno funkcijo imamo tudi v funkciji excel - NOW (), ki v preglednico vstavi tako trenutni čas kot tudi trenutni datum.

ČAS ()

Samo vnesti moramo funkcijo. Pravzaprav za vstavitev trenutnega časa ni dovolj, da v oklepaje pripnemo samo ČAS. Rezultat funkcije TIME je v nizu.

Kako uporabiti funkcijo TIME v VBA?

Naj vam pokažem primer preprostega TIME v funkciji excel. Sledite spodnjim korakom, da ustvarite kodo za uporabo funkcije TIME.

1. korak: ustvarite makro.

Koda:

Sub Time_Example1 () Konec Sub

2. korak: Spremenljivko prijavite kot niz.

Koda:

Sub Time_Example1 () Zatemni CurrentTime kot niz na koncu Sub

3. korak: tej spremenljivki dodelite vrednost s funkcijo TIME.

Koda:

Sub Time_Example1 () Zatemni CurrentTime kot niz CurrentTime = Time End Sub

4. korak: Zdaj v okencu za sporočilo prikažite rezultat.

Koda:

Sub Time_Example1 () Zatemni CurrentTime kot niz CurrentTime = Time MsgBox CurrentTime End Sub

Zaženite to kodo s tipko F5 ali ročno. Dobili bomo trenutni čas.

Torej, ko sem zagnal to kodo, je bil čas 11.51.54 AM.

Alternativa funkcije Now ()

Kombinacija datuma in časa kot alternativa funkciji ZDAJ

Kot sem povedal na začetku članka, lahko ZDAJ vstavite trenutni datum in čas. Vendar pa lahko kot alternativni funkciji funkciji ZDAJ uporabimo še dve funkciji; ti dve funkciji sta funkciji VBA DATE & VBA TIME.

VBA Date vrne trenutni datum, Time pa trenutni čas, tako da je to funkcija NOW. Spodaj je nabor kod, ki bo vstavil trenutni datum in čas v celico A1.

Koda:

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

Ta koda bo vstavila trenutni datum in čas v celico A1.

Za te vrednosti lahko uporabimo tudi obliko s funkcijo FORMAT. Spodnja koda bo oblikovala datum in uro.

Koda:

Sub Time_Example2 () Obseg ("A1"). Vrednost = Datum & "" & Časovni razpon ("A1"). NumberFormat = "dd-mmm-llll hh: mm: ss AM / PM" End Sub

Zdaj je rezultat te kode naslednji.

Sledite svojim odprtim zapisom v delovni knjigi s funkcijo časa v VBA

Pogosto moramo poznati čas odpiranja delovne knjižice. Obstaja situacija, ko delovni zvezek odpremo precej pogosto in naredimo nekaj sprememb. S sledenjem času in datumu odpiranja delovnega zvezka lahko sledimo času odpiranja delovnega zvezka.

Ustvarite nov list in ga preimenujte v »Track Sheet«.

1. korak: V programu VBE Editor dvokliknite ta delovni zvezek .

2. korak: Izberite delovni zvezek s spustnega seznama predmetov.

3. korak: Takoj, ko izberete to možnost, lahko v imenu »Workbook_Open ()« vidite nov makro, ki ga samodejno ustvari sam .

4. korak: Znotraj tega makra bomo morali napisati kodo za sledenje datumu in času odpiranja delovne knjige.

Kodo sem že napisal, spodaj pa je koda za vas.

Koda:

Private Sub Workbook_Open () Dim LR As Long LR = Sheets ("Track Sheet"). Celice (Rows.Count, 1). End (xlUp) .Row + 1 Sheets ("Track Sheet"). Celice (LR, 1) .Value = Datum & "" & Čas () Listi ("Track Sheet"). Celice (LR, 1) .NumberFormat = "dd-mmm-llll hh: mm: ss AM / PM" End Sub

Tako bodo zabeleženi časi odpiranja delovne knjižice, kot je spodaj.

Zanimive Članki...