Ajuda do LibreOffice 25.2
Retorna um valor Date para um ano, mês ou dia especificado.
DateSerial (ano, mês, dia)
Data
Year: expressão de número inteiro que indica um ano. Todos os valores entre 0 e 99 são interpretados como os anos 1900-1999. No caso de anos fora deste intervalo, insira todos os quatro dígitos.
Month: expressão de número inteiro que indica o mês do ano especificado. O intervalo aceito é de 1 a 12.
Dia: expressão de números inteiros que indica o dia do mês especificado. O intervalo aceito é entre 1 e 31. Não haverá erro caso insira um dia não existente para um mês com menos de 31 dias.
A função DateSerial retorna o número de dias entre 30 de Dezembro de 1899 e a data determinada. Você pode usar essa função para calcular a diferença entre duas datas.
The DateSerial function returns the data type Variant with VarType 7 (Date). Internally, this value is stored as a Double value, so that when the given date is 1900-01-01, the returned value is 2. Negative values correspond to dates before December 30, 1899 (not inclusive).
Se for definida uma data fora do intervalo aceito, o LibreOffice Basic retornará uma mensagem de erro.
Embora você defina a função DateValue como uma cadeia de caracteres que contém a data, a função DateSerial avalia cada um dos parâmetros (ano, mês, dia) como expressões numéricas separadas.
Sub ExampleDateSerial
Dim lDate As Long
Dim sDate As String
lDate = DateSerial(1964, 4, 9)
sDate = DateSerial(1964, 4, 9)
MsgBox lDate ' retorna 23476
MsgBox sDate ' returns 1964-04-09 in ISO 8601 format
End Sub