Renvoie un Variant de sous-type Date contenant l'heure correspondant à des éléments spécifiques d'heure, de minute et de seconde.
TimeSerial(hour, minute, second)
hour
Nombre entre 0 (12:00) et 23 (11:00) inclus ou expression numérique.
minute
Toute expression numérique.
second
Toute expression numérique.
Pour spécifier une heure telle que 11:59:59, la plage des nombres pour chaque argument TimeSerial doit se situer dans la plage normalement acceptée pour l'unité ; autrement dit, 0–23 pour les heures et 0–59 pour les minutes et les secondes. Toutefois, vous pouvez aussi spécifier des heures relatives pour chaque argument en utilisant toute expression numérique qui représente un certain nombre d'heures, de minutes ou de secondes avant ou après une heure donnée.
L'exemple suivant utilise des expressions à la place de nombres absolus d'heure. La fonction TimeSerial renvoie une heure correspondant à 15 avant (-15) six heures avant midi (12 - 6) ou 5:45:00.
Dim MyTime1
MyTime1 = TimeSerial(12 - 6, -15, 0) ' Renvoie 5:45:00.Lorsqu'un argument dépasse la plage normalement acceptée, il s'incrémente sur l'unité supérieure suivante. Si, par exemple, vous spécifiez 75 minutes, elles sont évaluées en 1 heure et 15 minutes. Toutefois, si un seul argument n'est pas compris dans la plage -32,768 à 32,767, ou si l'heure spécifiée par les trois arguments, soit directement soit par expression, génère une date non comprise dans la plage des dates acceptables, une erreur se produit.
DateSerial, fonction | DateValue, fonction | Hour, fonction | Minute, fonction | Now, fonction | Second, fonction | TimeValue, fonction