Função DateSerial

Retorna uma Variante (Data) para um ano, mês e dia especificados.

Sintaxe

DateSerial(ano, mês, dia)

A sintaxe da função DateSerial tem os seguintes argumentos nomeados:

Parte	Descrição
ano	Obrigatório; Inteiro. Número entre 100 e 9999, inclusive, ou uma expressão numérica.
mês	Obrigatório; Inteiro. Qualquer expressão numérica.
dia	Obrigatório; Inteiro. Qualquer expressão numérica.

Comentários

Para especificar uma data, como 31 de dezembro de 1991, o intervalo de números para cada argumentoDateSerial deve estar no intervalo aceito para a unidade; ou seja, 1 a 31 por dias e 1 a 12 por meses. No entanto, você também pode especificar datas relativas para cada argumento usando uma expressão numérica que representa um determinado número de dias, meses ou anos antes ou após uma determinada data.

O exemplo a seguir usa expressões numéricas em vez de números absolutos de datas. Aqui, a função DateSerial retorna uma data que é o dia anterior ao primeiro dia (1 - 1), dois meses antes de agosto (8 - 2), 10 anos antes de 1990 (1990 - 10), ou seja, 31 de maio de 1980.

No Windows 98 ou no Windows 2000, os anos de dois dígitos para o argumento ano são interpretados com base em configurações de máquina definidas pelo usuário. As configurações padrão definem que os valores entre 0 e 29, inclusive, sejam interpretados como os anos 2000–2029. Os valores padrão entre 30 e 99 são interpretados como os anos 1930–1999. Para os demais argumentos ano, use um ano de quatro dígitos (1800, por exemplo).

As versões anteriores do Windows interpretam anos de dois dígitos com base nos padrões descritos acima. Para ter certeza de que a função retornará o valor correto, use um ano de quatro dígitos.

Quando um argumento excede o intervalo considerado para esse argumento, ele é adequadamente incrementado para a próxima unidade maior. Por exemplo, ao especificar 35 dias, o argumento é avaliado como um mês e um determinado número de dias, dependendo da época do ano em que ele é aplicado. Um erro ocorrerá se um único argumento estiver fora do intervalo de -32.768 a 32.767. Se a data especificada pelos três argumentos estiver fora do intervalo de datas aceitável, ocorrerá um erro.

Observação

Para ano, mês e dia, se a configuração da propriedade Calendar for Gregoriano, o valor fornecido será considerado Gregoriano. Se a configuração da propriedade Calendar for Islâmico, o valor fornecido será considerado islâmico.

A parte de data retornada fica nas unidades de período de tempo do calendário atual do Visual Basic. Por exemplo, se o calendário atual for Islâmico e a parte da data a ser retornada for o ano, o valor de year será um ano Islâmico. Para o ano de argumento, os valores entre 0 e 99, inclusive, são interpretados como os anos 1400-1499. Para os demais valores de ano, use um ano completo de quatro dígitos (1520, por exemplo).

Exemplo

Este exemplo usa a função DateSerial para retornar a data para o ano, mês e dia especificados.

Dim MyDate
' MyDate contains the date for February 12, 1969.
MyDate = DateSerial(1969, 2, 12)    ' Return a date.

Confira também

• Funções (Visual Basic for Applications)

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.