Devolve uma Variante (Data) que contém a hora para uma hora, minuto e segundo específicos.
Sintaxe
SerieHora(hora, minuto, segundo)
A sintaxe da função SerieHora tem os seguintes argumentos (argumento: valor que fornece informações a uma acção, evento, método, propriedade, função ou procedimento.):
Observações
Para especificar uma hora como, por exemplo 11:59:59, o intervalos de números para cada argumento de SerieHora deve estar no intervalo normal para a unidade; isto é, 0–23 para as horas e 0–59 para os minutos e segundos. No entanto, também pode especificar horas relativas para cada argumento (argumento: valor que fornece informações a uma acção, evento, método, propriedade, função ou procedimento.) utilizando qualquer expressão numérica que represente alguns números de horas, minutos ou segundos antes ou após uma determinada hora. O exemplo que se segue utiliza expressões (expressão: qualquer combinação de funções, constantes, operadores lógicos ou matemáticos e nomes de campos, controlos e propriedades que resulta num único valor. As expressões podem efectuar cálculos, manipular caracteres ou testar dados.) em vez de números de hora absolutos. A função SerieHora devolve uma hora para 15 minutos antes de (-15) seis horas antes do meio-dia (12 - 6) ou 5:45:00.
TimeSerial(12 - 6, -15, 0)
Quando qualquer argumento excede o intervalo normal para esse argumento, é deslocado para a unidade maior seguinte adequada. Por exemplo, se especificar 75 minutos, é avaliado como uma hora e 15 minutos. Se um argumento isolado não estiver no intervalo entre -32.768 e 32.767, ocorre um erro. Se a hora especificada pelos três argumentos fizer com que a data não esteja dentro do intervalo de datas aceite, ocorre um erro.
Exemplo
Nota Os exemplos que se seguem demonstram a utilização desta função num módulo do Visual Basic for Applications (VBA). Para mais informações sobre como trabalhar com VBA, seleccione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de procura.
Este exemplo utiliza a função SerieHora para devolver uma hora para a hora, minuto e segundo especificados.
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.