Vrátí hodnotu typu Variant (Date), která udává čas pro zadané hodiny, minuty a sekundy.
Syntaxe
TimeSerial(hodina, minuta, sekunda)
Upozornění Zkontrolujte, jestli jsou argumenty ve správném rozsahu hodnot. Neplatný argument může mít za následek nesprávný výsledek.
Syntaxe funkce TimeSerial obsahuje tyto argumenty:
| Argument | Popis |
|---|---|
| hodina | Povinný argument. Proměnná (celé číslo) Číslo od 0 do 23 (včetně) nebo číselný výraz. |
| minuta | Povinný argument. Proměnná (celé číslo) Libovolný číselný výraz. |
| druhý | Povinný argument. Proměnná (celé číslo) Libovolný číselný výraz. |
Poznámky
Pokud chcete zadat čas, například 11:59:59, měl by být rozsah čísel pro každý argument TimeSerial v normálním rozsahu pro jednotku; to znamená 0–23 pro hodiny a 0–59 pro minuty a sekundy. Můžete však také zadat relativní časy pro každý argument pomocí libovolného číselného výrazu, který představuje určitý počet hodin, minut nebo sekund před nebo po určitém čase. V následujícím příkladu jsou místo absolutních čísel času použity výrazy. Funkce TimeSerial vrací čas o 15 minut před polednem (-15) šest hodin před polednem (12 - 6) nebo 5:45:00 dop.
TimeSerial(12 - 6, -15, 0)
Pokud některý z argumentů překročí normální rozsah daného argumentu, zvýší se podle potřeby na nejbližší větší jednotku. Pokud například zadáte 75 minut, bude výsledkem jedna hodina a 15 minut. Pokud je libovolný argument mimo rozsah od -32 768 do 32 767, dojde k chybě. Pokud čas určený třemi argumenty způsobí, že datum spadá mimo povolený rozsah kalendářních dat, dojde k chybě.
Příklad dotazu
| Výraz | Výsledky: |
|---|---|
| SELECT TimeSerial(18;12;10) AS NewTime FROM ProductSales GROUP BY TimeSerial(18;12;10); | Vrátí hodnotu "Time" složenou ze zadané hodiny, minuty a sekundy zadané v argumentech funkce a zobrazí se ve sloupci NewTime. Výsledek: 18:12:10. |
Příklad jazyka VBA
Poznámka
Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.
V tomto příkladu funkce TimeSerial vrací čas pro zadanou hodinu, minutu a sekundu.
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.