Devolve uma Variante (Data) para um ano, mês ou dia especificado.
Sintaxe
DataSerial(ano; mês; dia)
Advertência Certifique-se de que os argumentos estão no intervalo de valores correto. Um argumento inválido pode originar um resultado incorreto.
A sintaxe da função DataSerial tem estes argumentos:
| Argumento | Descrição |
|---|---|
| ano | Obrigatório. Número inteiro. Número entre 100 e 9999, inclusive, ou uma expressão numérica. |
| mês | Obrigatório. Número inteiro. Qualquer expressão numérica. |
| Dia | Obrigatório. Número inteiro. Qualquer expressão numérica. |
Observações
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–31 para dias e 1–12 para meses. No entanto, também pode especificar datas relativas para cada argumento ao utilizar qualquer expressão numérica que represente algum número de dias, meses ou anos antes ou depois de uma determinada data.
O exemplo seguinte utiliza expressões numéricas em vez de números de datas absolutos. Aqui, a função DataSerial 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); ou seja, 31 de maio de 1980.
DateSerial(1990 - 10, 8 - 2, 1 - 1)
Os anos de dois dígitos para o argumento ano são interpretados com base nas configurações da máquina definidas pelo usuário. Por predefinição, os valores entre 0 e 29, inclusive, são interpretados como os anos 2000–2029. Os valores predefinidos entre 30 e 99 são interpretados como os anos 1930–1999. Para todos os outros argumentos ano , utilize um ano de quatro dígitos (por exemplo, 1800).
As versões do Windows anteriores ao Windows 2000 interpretam anos de dois dígitos com base nas predefinições descritas acima. Para ter certeza de que a função retorna o valor adequado, use um ano de quatro dígitos.
Quando um argumento excede o intervalo aceite para esse argumento, aumenta para a unidade maior seguinte, conforme apropriado. Por exemplo, se especificar 35 dias, é avaliado como um mês e algum número de dias, dependendo de onde no ano em que é aplicado. Se um único argumento estiver fora do intervalo -32.768 a 32.767, ocorre um erro. Se a data especificada pelos três argumentos estiver fora do intervalo de datas aceitável, ocorre um erro.
Nota
Para ano,mês e dia, se a definição da propriedade Calendar for Gregoriano, o valor fornecido é assumido como Gregoriano. Se a definição da propriedade Calendar for Hijri, o valor fornecido é assumido como Hijri.
A parte da data devolvida 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 da data a devolver for o ano, o valor do ano é um ano Hijri. 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 , utilize o ano completo de quatro dígitos (por exemplo, 1520).
Exemplo de consulta
| Expressão | Resultados |
|---|---|
| SELECT DateSerial(2018,12,13) COMO NewDate FROM ProductSales; | Devolve a "data" do ano, mês e dia especificados introduzidos nos argumentos da função e apresentados na coluna "DataNova". Resultado: "13/12/2018". |
Exemplo do VBA
Nota
Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.
Este exemplo utiliza a função DataSerial para devolver a data, mês e dia especificados.
Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.