VBA ajafunktsioon - Näited Exceli VBA ajafunktsiooni kasutamiseks

Lang L: none (table-of-contents)

Exceli VBA ajafunktsioon

Funktsioon VBA tagastab praeguse aja, samuti on oluline märkida, et sellel funktsioonil pole mingeid argumente. Teine oluline tegur, mida meeles pidada, on see, et see funktsioon tagastab praeguse süsteemi aja. Selle funktsiooni abil leiame tegelikult reaalse aja, mille koodirida protsessi lõpuleviimiseks kulub.

AEG on omamoodi kõikuv funktsioon. Sellel pole mingit süntaksit.

Meil on sarnane funktsioon ka funktsioonis excel - NOW (), mis sisestab arvutustabelisse nii praeguse aja kui ka praeguse kuupäeva.

TIME ()

Peame lihtsalt funktsiooni sisestama. Tegelikult pole praeguse aja sisestamiseks piisav sulgude lisamise vajadus ainult TIME. Funktsiooni TIME antud tulemus on stringis.

Kuidas kasutada funktsiooni TIME VBA-s?

Lubage mul näidata teile Exceli funktsiooni lihtsa TIME näide. Funktsiooni TIME kasutamiseks koodi loomiseks toimige järgmiselt.

1. samm: looge makro.

Kood:

Alam aeg_näide1 () Lõpp alam

2. samm: kuulutage muutuja stringiks.

Kood:

Alam-aeg_näide1 () Hämardab praeguse aja stringi lõpus Alam

3. samm: määrake sellele muutujale funktsioon TIME funktsiooni abil väärtus.

Kood:

Sub Time_Eexample1 () Dim CurrentTime As String CurrentTime = Time End Sub

4. samm: nüüd kuvage tulemus sõnumikastis.

Kood:

Sub Time_Eexample1 () Dim CurrentTime kui string String CurrentTime = Time MsgBox CurrentTime End Sub

Käivitage see kood klahviga F5 või käsitsi. Saame praeguse aja.

Nii et kui ma seda koodi käivitasin, oli kell 11.51.54.

Funktsiooni Now () alternatiiv

Kuupäeva ja kellaaja kombinatsioon funktsiooni NOW alternatiivina

Nagu ma artikli alguses ütlesin, saab NOW sisestada praeguse kuupäeva ja kellaaja. Kuid funktsiooni NOW alternatiivse funktsioonina võime kasutada kahte muud funktsiooni; need kaks funktsiooni on funktsioonid VBA DATE ja VBA TIME.

VBA kuupäev tagastab praeguse kuupäeva ja kellaaeg tagastab praeguse kellaaja, seega muudab see funktsiooni NÜÜD. Allpool on koodikomplekt, mis sisestab lahtrisse A1 praeguse kuupäeva ja kellaaja.

Kood:

Alamaja_näide2 () vahemik ("A1"). Väärtus = Kuupäev & "" & Aja lõpu alam

See kood sisestab lahtrisse A1 praeguse kuupäeva ja kellaaja.

Nendele väärtustele saame vormingu rakendada ka funktsiooni FORMAT abil. Allolev kood vormistab kuupäeva ja kellaaja.

Kood:

Alamaja_näide2 () vahemik ("A1"). Väärtus = Kuupäev & "" & ajavahemik ("A1"). NumberFormat = "pp-kk-aaaa hh: mm: ss AM / PM" Lõpp alam

Nüüd on selle koodi tulemus järgmine.

Jälgige oma töövihiku avatud kirjeid VBA ajafunktsiooni abil

Sageli peame teadma oma töövihiku avamise aja sagedust. On olukord, kus avame töövihiku üsna tihti ja teeme mõningaid muudatusi. Töövihiku avamise kellaaja ja kuupäeva jälgimisega saame jälgida töövihiku avamise aega.

Looge uus leht ja nimetage see ümber „Jälgimisleheks”.

1. samm: topeltklõpsake seda töövihikut VBE-redaktorist.

2. samm: valige objekti rippmenüüst töövihik.

3. samm: niipea kui olete selle suvandi valinud, näete nime „Workbook_Open ()” enda loodud uut makrot .

4. samm: selle makro sees peame kirjutama koodi töövihiku avamise kuupäeva ja kellaaja jälgimiseks.

Olen koodi juba kirjutanud ja allpool on kood teie jaoks.

Kood:

Private Sub Workbook_Open () Dim LR As Long LR = Sheets ("Track Sheet"). Lahtrid (Rows.Count, 1) .End (xlUp). Rida + 1 Sheets ("Track Sheet"). Lahtrid (LR, 1) .Value = Kuupäev & "" & Kellaaeg () - lehed ("Jälgimisleht"). Lahtrid (LR, 1) .NumberFormat = "pp-kk-aaaa hh: mm: ss AM / PM" Lõpp-alam

See fikseerib teie töövihiku avamisajad nagu allpool.

Huvitavad Artiklid...