Função DateSerial

Importante :  Este artigo foi traduzido por um sistema de tradução automática, leia o aviso de isenção de responsabilidade. Para sua referência, veja a versão em inglês deste artigo aqui.

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

Sintaxe

DateSerial ( ano, mês, dia )

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

Argumento

Descrição

ano

Necessário. Número inteiro. Número entre 100 e 9999, inclusive, ou uma numeric expression.

mês

Necessário. Número inteiro. Qualquer expressão numérica.

dia

Necessário. Número 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 DateSerialargument deve estar no intervalo aceito para a unidade; Isto é, 1 – 31 para dias e 1 – 12 para meses. No entanto, você também pode especificar datas relativas para cada argumento usando qualquer expressão numérica que representa um 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 de data absoluta. Veja a função DateSerial retorna uma data que é o 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)

Anos de dois dígitos para o argumento de ano são interpretados com base nas configurações de máquina definidas pelo usuário. As configurações padrão são que valores entre 0 e 29, inclusive, são interpretados como os anos 2000 – 2029. Os valores padrão entre 30 e 99 são interpretados como os anos 1930 – 1999. Para todos os outros argumentos de 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 em padrões descritos acima. Para ter certeza a função retornará o valor adequado, use um ano de quatro dígitos.

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

Observação : Para o ano, mês, e dia, se a configuração de propriedade de calendário for Gregoriano, o valor fornecido será considerado como gregoriano. Se a configuração de propriedade de calendário for Islâmico, o valor fornecido será considerado islâmico.

A parte da 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 Islâmico e a parte da data a ser retornado é o ano, o valor de ano é um ano Islâmico. Para o argumento ano, valores entre 0 e 99, inclusive, são interpretados como os anos 1400-1499. Para todos os outros valores de ano , use o ano de quatro dígitos completo (por exemplo, 1520).

Exemplo

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

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

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

Observação : Aviso de Isenção de Tradução Automática: Este artigo foi traduzido por computador, sem intervenção humana. A Microsoft oferece essas traduções automáticas para ajudar as pessoas que não falam inglês a aproveitar os textos escritos sobre produtos, serviços e tecnologias da Microsoft. Como este artigo foi traduzido automaticamente, é possível que contenha erros de vocabulário, sintaxe ou gramática.

Expanda suas habilidades
Explore o treinamento
Obtenha novos recursos primeiro
Ingressar no Office Insider

Essas informações foram úteis?

Obrigado por seus comentários!

Agradecemos pelos seus comentários! Parece que pode ser útil conectar você a um de nossos agentes de suporte do Office.

×