Applies ToAccess para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

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

Sintaxe

DateSerial ( ano, mês, dia )

Aviso    Verifique se os argumentos estão no intervalo correto de valores. Um argumento inválido pode resultar em um resultado incorreto.

A sintaxe da função DateSerial tem esses argumentos:

Argumento

Descrição

ano

Obrigatório. Inteiro. Número entre 100 e 9999, inclusive ou um 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 argumento DateSerial 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 qualquer expressão numérica que represente alguns dias, meses ou anos antes ou depois de uma determinada data.

O exemplo a seguir usa expressões numéricas em vez de números de data absolutas. Aqui, a função DateSerial retorna uma data que é um dia antes do primeiro dia (1 - 1), dois meses antes de agosto (8 - 2), 10 anos antes de 1990 (1990 - 10); em outras palavras, 31 de maio de 1980.

DateSerial(1990 - 10, 8 - 2, 1 - 1)

Os anos de dois dígitos para o argumento do ano são interpretados com base nas configurações do computador definidas pelo usuário. As configurações padrão são de que os valores entre 0 e 29, inclusive, são interpretados como os anos de 2000 a 2029. Os valores padrão entre 30 e 99 são interpretados como os anos de 1930 a 1999. Para todos os outros argumentos do ano , use um ano de quatro dígitos (por exemplo, 1800).

Versões do Windows anteriores ao Windows 2000 interpretam anos de dois dígitos com base nos padrões descritos acima. Para ter certeza de que a função retorna o valor adequado, use um ano de quatro dígitos.

Quando qualquer argumento excede o intervalo aceito para esse argumento, ele incrementa para a próxima unidade maior, conforme apropriado. Por exemplo, se você especificar 35 dias, ele será avaliado como um mês e alguns dias, dependendo de onde no ano ele é aplicado. Se algum argumento único estiver fora do intervalo -32.768 a 32.767, ocorrerá um erro. Se a data especificada pelos três argumentos estiver fora do intervalo aceitável de datas, ocorrerá um erro.

Observação: Durante o ano, mês e dia, se a configuração da propriedade Calendar for gregoriana, o valor fornecido será considerado gregoriano. Se a configuração da propriedade Calendar for Hijri, o valor fornecido será considerado Hijri.

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

Exemplo de consulta

Expressão

Resultados

SELECT Dateserial(2018,12,13) AS NewDate FROM ProductSales;

Retorna a "data" do ano, mês e dia especificados inseridos nos argumentos da função e são exibidos na coluna "NewDate". Resultado: "13/12/2018".

Exemplo de VBA

Observação: Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.

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

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

Escolher a função de data certa

Precisa de mais ajuda?

Quer mais opções

Explore os benefícios da assinatura, procure cursos de treinamento, saiba como proteger seu dispositivo e muito mais.

As comunidades ajudam você a fazer e responder perguntas, fazer comentários e ouvir especialistas com conhecimento avançado.