Devolve uma Variante (Data) para um ano, mês e dia especificados.
Sintaxe
DataSerial(ano, mês, dia)
A sintaxe da função DataSerial tem os seguintes argumentos (argumento: valor que fornece informações a uma acção, evento, método, propriedade, função ou procedimento.):
Observações
Para especificar uma data, por exemplo, 31 de Dezembro de 1991, o intervalo de números de cada argumento (argumento: valor que fornece informações a uma acção, evento, método, propriedade, função ou procedimento.) DataSerialdeve estar compreendido no intervalo aceite para a unidade; ou seja, 1–31 para dias e 1–12 para meses. No entanto, pode especificar também datas relativas para cada argumento, utilizando qualquer expressão numérica que represente um 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 valores de data absolutos. Aqui, a função DataSerial devolve 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); por outras palavras, 31 de Maio de 1980.
DateSerial(1990 - 10, 8 - 2, 1 - 1)
Os anos com dois dígitos para o argumento ano são interpretados com base nas definições de máquina efectuadas pelo utilizador. As predefinições indicam que os valores entre 0 e 29, inclusive, são interpretadas 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 com quatro dígitos (por exemplo, 1800).
As versões do Windows anteriores ao Windows 2000 interpretam os anos com dois dígitos com base nas predefinições descritas acima. Para certificar-se de que a função devolve o valor correcto, utilize um ano com quatro dígitos.
Quando qualquer argumento excede o intervalo aceite para esse argumento, é deslocado para a unidade maior seguinte adequada. Por exemplo, se especificar 35 dias, é avaliado como um mês e alguns dias, dependendo do local em que se aplica no ano. Se um argumento isolado não estiver compreendido no intervalo entre -32.768 e 32.767, ocorre um erro. Se a data especificada pelos três argumentos não estiver compreendida no intervalo de datas aceite, ocorre um erro.
Nota Para ano, mês e dia, se a definição da propriedade do Calendário for Gregoriano, o valor fornecido é assumido como Gregoriano. Se a definição da propriedade do Calendário for Hijri, o valor fornecido é assumido como Hijri.
A parte da data devolvida encontra-se nas unidades de período de tempo do calendário Visual Basic. Por exemplo, se o calendário actual for Hijri e a parte da data a devolver for o ano, o respectivo valor é um ano Hijri. Para o argumento ano, os valores entre 0 e 99, inclusive, são interpretados como os anos 1400-1499. Para todos os outros valores de ano, utilize um ano completo com quatro dígitos (por exemplo, 1520).
Exemplo
Nota Os exemplos que se seguem demonstram a utilização desta função num módulo do Visual Basic for Applications (VBA). Para mais informações sobre como trabalhar com VBA, seleccione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de procura.
Este exemplo utiliza a função DataSerial para devolver 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.