Vraća vrijednost Variant (Datum) koja sadrži vrijeme za određeni sat, minutu i sekundu.
Sintaksa
TimeSerial ( sat, minuta, drugo )
Upozorenje Provjerite jesu li argumenti u ispravnom rasponu vrijednosti. Argument koji nije valjan može rezultirati netočnim rezultatom.
Sintaksa funkcije TimeSerial sadrži sljedeće argumente:
|
Argument |
Opis |
|
sat |
Obavezno. Variant (cijeli broj). Broj između 0 (12:00 A.M.) i 23 (11:00), inclusive ili numerički izraz. |
|
minuta |
Obavezno. Variant (cijeli broj). Bilo koji brojčani izraz. |
|
sekunda |
Obavezno. Variant (cijeli broj). Bilo koji brojčani izraz. |
Napomene
Da biste odredili vrijeme, kao što je 11:59:59, raspon brojeva za svaki argument TimeSerial trebao bi biti u normalnom rasponu za jedinicu. To je, 0 – 23 za sate i 0 – 59 za minute i sekunde. No, možete navesti i relativne vrijeme za svaki argument pomoću numeričkog izraza koji predstavlja neki broj sati, minuta ili sekunde prije ili nakon određenog vremena. U sljedećem se primjeru koristi izrazi umjesto apsolutnih brojeva vremena. Funkcija TimeSerial vraća vrijeme za 15 minuta prije (-15) šest sati prije podneva (12 - 6) ili 5:45:00 ujutro.
TimeSerial(12 - 6, -15, 0)
Kada neki argument premašuje uobičajeni raspon tog argumenta, on se povećava na sljedeću veću jedinicu prema potrebi. Ako, primjerice, navedete 75 minuta, ona se procjenjuje kao jedan sat i 15 minuta. Ako je bilo koji pojedinačni argument izvan raspona-32.768 na 32.767, pojavljuje se pogreška. Ako vrijeme određeno tri argumenta uzrokuje pad datuma izvan prihvatljivog raspona datuma, pojavljuje se pogreška.
Primjer upita
|
Izraz |
Rezultati |
|
Odaberite TimeSerial (18, 12, 10) kao NewTime iz grupe ProductSales po TimeSerial (18, 12, 10); |
Vraća "vrijeme" koje se sastoji od određenog sata, minute i sekunde unesene u argumente funkcije i prikazuje se u programu NewTime. Rezultat: "6:12:10 PM". |
Primjer VBA
Napomena: Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.
U ovom se primjeru koristi funkcija TimeSerial da bi se vratilo vrijeme za određeno sat, minutu i drugo.
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.
