Função TimeSerial
Retorna uma Variant (Data) que contém a hora de uma hora, minuto e segundo específicos.
Sintaxe
TimeSerial(hora, minuto, segundo)
A sintaxe da função TimeSerial tem esses argumentos nomeados:
Sair | Descrição |
---|---|
Hora | Necessário; Variant (Inteiro). Número entre 0 (12:00) e 23 (21:00), inclusive ou uma expressão numérica. |
Minuto | Necessário; Variant (Inteiro). Qualquer expressão numérica. |
Segundo | Necessário; Variant (Inteiro). Qualquer expressão numérica. |
Comentários
Para especificar uma hora, como 11:59:59, o intervalo de números para cada argumento TimeSerial deve estar no intervalo normal da unidade; ou seja, 0 a 23 por horas e 0 a 59 por minutos e segundos. No entanto, você também pode especificar tempos relativos para cada argumento usando qualquer expressão numérica que represente algum número de horas, minutos ou segundos antes ou depois de um determinado tempo.
O exemplo a seguir usa expressões em vez de números de tempo absolutos. A função TimeSerial retorna um tempo de 15 minutos antes (-15
) seis horas antes do meio-dia (12 - 6
) ou 5:45:00 da manhã.
TimeSerial(12 - 6, -15, 0)
Quando qualquer argumento excede o intervalo normal para esse argumento, ele incrementa para a próxima unidade maior, conforme apropriado. Por exemplo, se você especificar 75 minutos, ele será avaliado como uma hora e 15 minutos. Um erro ocorrerá se um único argumento estiver fora do intervalo de -32.768 a 32.767. Se a hora especificada pelos três argumentos fizer com que a data fique fora do intervalo aceitável de datas, ocorrerá um erro.
Exemplo
Este exemplo usa a função TimeSerial para retornar um tempo para a hora, o minuto e o segundo especificados.
Dim MyTime
MyTime = TimeSerial(16, 35, 17) ' MyTime contains serial
' representation of 4:35:17 PM.
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.