Data e número de série

Devolve um objeto Variant do subtipo Date correspondente a um ano, mês e dia especificados.

Estrutura

DateSerial(ano, mês, dia)

Parâmetros

ano - número entre 100 e 9999, inclusive, ou uma expressão numérica.

mês - qualquer expressão numérica.

dia - qualquer expressão numérica.

Descrição

Para especificar uma data, como 31 de dezembro de 1991, o intervalo de números para cada argumento DateSerial deve estar dentro do intervalo permitido para a unidade; ou seja, 1 a 31 para os dias e 1 a 12 para os meses. No entanto, também é possível especificar datas relativas para cada argumento utilizando qualquer expressão numérica que represente um determinado número de dias, meses ou anos antes ou depois de uma determinada data.

Exemplo

O exemplo seguinte utiliza expressões numéricas em vez de datas absolutas. Aqui, a função DateSerial devolve uma data que corresponde ao dia anterior ao primeiro dia (1 - 1) dos dois meses anteriores a agosto (8 - 2) de 10 anos antes de 1990 (1990 - 10); por outras palavras, 31 de maio de 1980.

Dim MyDate1, MyDate2

; MyDate1 = DateSerial(1970, 1, 1) ' Devolve 1 de janeiro de 1970.

MyDate2 = DateSerial(1990 - 10, 8 - 2, 1 - 1) ' Devolve 31 de maio de 1980.

No caso do argumento «ano», os valores entre 0 e 99, inclusive, são interpretados como os anos de 1900 a 1999. Para todos os outros anos, utilize o ano completo com quatro dígitos (por exemplo, 1800).

Quando um argumento excede o intervalo aceitável para esse argumento, ele é arredondado para a unidade superior, conforme apropriado. Por exemplo, se especificar 35 dias, isso é interpretado como um mês e alguns dias, dependendo da época do ano em que for aplicado. No entanto, se algum dos argumentos estiver fora do intervalo de -32 768 a 32 767, ou se a data especificada pelas três estruturas, seja diretamente ou por meio de uma expressão, estiver fora do intervalo de datas aceitável, ocorre um erro. |