Devuelve un tipo Variant de subtipo Date que contiene una hora compuesta por una hora, minuto y segundo específicos.

TimeSerial(hora, minuto, segundo)

Argumentos

hora

Número entre 0 (12:00 a.m.) y 23 (11:00 p.m.), inclusive, o una expresión numérica.

minuto

Cualquier expresión numérica.

segundo

Cualquier expresión numérica.

Observaciones

Para especificar una hora, como 11:59:59, el intervalo de números para cada argumento TimeSerial debe estar en el intervalo aceptado para la unidad; es decir, 0–23 para horas y 0–59 para minutos y segundos. Sin embargo, también puede especificar horas relativas para cada argumento mediante cualquier expresión numérica que represente un número de horas, minutos o segundos antes o después de un período determinado.

El siguiente ejemplo utiliza expresiones en lugar de números de hora absolutos. La función TimeSerial devuelve una hora para 15 minutos antes (-15) de seis horas antes de la tarde (12 - 6), es decir, 5:45:00 a.m.

Dim MiHora1
MiHora1 = TimeSerial(12 - 6, -15, 0)   ' Devuelve 5:45:00 AM.

Cuando cualquier argumento sobrepasa el intervalo aceptado para dicho argumento, se aumenta hasta la siguiente unidad mayor apropiada. Por ejemplo, si especifica 75 minutos, se evalúa como una hora y 15 minutos. Sin embargo, si cualquier argumento simple está fuera del intervalo de -32.768 a 32.767, o si la hora especificada por los tres argumentos, directamente o por expresión, hace que la fecha quede fuera del intervalo aceptable de fechas, se produce un error.

Requisitos

Versión 1

Consulte también

Función DateSerial | Función DateValue | Función Hour | Función Minute | Función Now | Función Second | Función TimeValue