VBA időfunkció | Példák az Excel VBA Time Function használatára

Excel VBA időfunkció

VBA idő függvény visszaadja az aktuális időt, továbbá az a fontos megjegyezni, hogy ez a funkció nincs érv, hogy egyáltalán, egy másik fontos tényező, hogy emlékszik, hogy ez a függvény az aktuális rendszeridőt. Ennek a függvénynek a segítségével megtudhatjuk a kódsornak a folyamat befejezéséhez szükséges tényleges idejét.

A TIME egyfajta volatilis függvény, nem rendelkezik vele szintaxissal.

Hasonló funkciónk van az excel - NOW () függvényben is, amely beszúrja az aktuális időket és az aktuális dátumot is a táblázatba

IDŐ ()

Csak be kell írnunk a függvényt, valójában nem kell zárójelben feltüntetni a TIME-ot, hogy elegendő legyen az aktuális idő beillesztéséhez. A TIME függvény által megadott eredmény a karakterláncban található.

Hogyan kell használni a TIME funkciót a VBA-ban?

Hadd mutassam meg az egyszerű TIME példát az excel függvényben. Kövesse az alábbi lépéseket a kód létrehozásához a TIME funkció használatához.

Ezt a VBA időfunkciósablont innen töltheti le - VBA időfüggvénysablon

1. lépés: Hozzon létre egy makrót.

Kód:

 Sub Time_Példa1 () End Sub 

2. lépés: Nyújtson be egy változót karakterláncként.

Kód:

 Sub Time_Példa1 () Dim CurrentTime mint karakterlánc vége Sub 

3. lépés: Rendeljen értéket ehhez a változóhoz a TIME függvényen keresztül.

Kód:

 Sub Time_Példa1 () Dim CurrentTime mint karakterlánc CurrentTime = Idő vége Sub 

4. lépés: Most mutassa meg az eredményt az üzenetmezőben.

Kód:

 Sub Time_Példa1 () Dim CurrentTime mint karakterlánc CurrentTime = Time MsgBox CurrentTime End Sub 

Futtassa ezt a kódot az F5 billentyű használatával, vagy manuálisan megkapjuk az aktuális időt.

Tehát amikor futtattam ezt a kódot, az idő 11.51.54 volt.

A Now () függvény alternatívája

Dátum és idő kombinációja a NOW funkció alternatívájaként

Mint a cikk elején elmondtam, MOST beillesztheti az aktuális dátumot és időt. Mindazonáltal két másik funkciót is használhatunk a NOW funkció alternatívaként, ez a két funkció a VBA DATE és a VBA TIME függvény.

A VBA dátum az aktuális dátumot adja vissza, az idő pedig az aktuális időt, így ez teszi a MOST funkciót. Az alábbiakban olyan kódkészlet található, amely beilleszti az aktuális dátumot és időt az A1 cellába.

Kód:

 Sub Time_Példa2 () Tartomány ("A1"). Érték = Date & "" & Time End Sub 

Ez a kód beilleszti az aktuális dátumot és időt az A1 cellába.

A FORMAT függvény segítségével formátumot is alkalmazhatunk ezekre az értékekre. Az alábbi kód formázza a dátumot és az időt.

Kód:

 Sub Time_Példa2 () Tartomány ("A1"). Érték = Dátum & "" & Időtartomány ("A1"). NumberFormat = "dd-mmm-yyyy hh: mm: ss AM / PM" End Sub 

Most ennek a kódnak az eredménye a következő.

Kövesse nyomon a munkafüzet nyitott rekordjait a VBA időfunkciójával

Gyakran ismernünk kell munkafüzetünk nyitási idő-frekvenciáját. Van olyan helyzet, amikor elég gyakran kinyitjuk a munkafüzetet, és változtatunk rajta. A munkafüzet nyitási idejének és dátumának nyomon követésével nyomon követhetjük a munkafüzet nyitási idejét.

Hozzon létre egy új lapot, és nevezze át „Track Sheet” -nek.

1. lépés: Kattintson duplán erre a munkafüzetre a VBE szerkesztőből.

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.