Funktsioon TimeSerial

Tagastab tüübile Variant (Kuupäev) vastavad andmed, mis sisaldavad kindlale tunnile, minutile ja sekundile vastavat kellaaega.

Süntaks

TimeSerial ( tund, minut, sekund )

Funktsiooni TimeSerial süntaksil on järgmised argumendid.

Argument

Kirjeldus

tund

Nõutav. Variant (Täisarv). Arv vahemikus 0 ja 23 (k.a või arvuline avaldis).

minut

Nõutav. Variant (Täisarv). Mis tahes arvuline avaldis.

sekund

Nõutav. Variant (Täisarv). Mis tahes arvuline avaldis.


Kommentaarid

Kellaaja (nt 11:59:59) määramiseks peaksid funktsiooni TimeSerial argumentidele vastavad arvuvahemikud olema üksuste tavavahemikus, st tundide korral vahemikus 0–23 ning minutite ja sekundite korral vahemikus 0–59. Samuti saate määrata iga argumendi jaoks suhtelise kellaaja, kasutades selleks arvulist avaldist, mis tähistab kindlale kellaajale eelnevat või järgnevat tundide, minutite või sekundite arvu. Järgmises näites kasutatakse absoluutsete kellaajaarvude asemel avaldisi. Funktsioon TimeSerial tagastab kellaaja 5:45:00 ehk 15 minutit enne (-15) lõunale eelnevat kuut tundi (12 - 6).

TimeSerial(12 - 6, -15, 0)

Kui mõne argumendi väärtus on suurem vastava argumendi tavavahemiku väärtustest, suurendatakse seda vastavalt järgmise ühikuni. Näiteks kui määrate väärtuse 75 minutit, arvestatakse seda ühe tunni ja 15 minutina. Kui argument on väljaspool vahemikku -32 768–32 767, ilmneb tõrge. Tõrge ilmneb ka siis, kui kolme argumendiga määratud kellaaja tõttu jääb kuupäev väljapoole sobivat kuupäevavahemikku.

Näide

Märkus.: Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Selles näites tagastatakse funktsiooni TimeSerial abil määratud tunnile, minutile ja sekundile vastav kellaaeg.

Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.
Täiendage Office'i kasutamise oskusi
Tutvuge koolitusmaterjalidega
Kasutage uusi funktsioone enne teisi
Liituge Office Insideri programmiga

Kas sellest teabest oli abi?

Täname tagasiside eest!

Täname tagasiside eest! Tundub, et võiksime teid kokku viia ühega meie Office'i tugiagentidest, kes aitab teil probleemi lahendada.

×