Função DatePart

Devolve a parte especificada de uma determinada data.

Sintaxe

DatePart(interval, date)

Argumentos:

• Interval: Obrigatório. Expressão de string que é o intervalo a ser retornado. Consulte a seção Configurações para ver os valores.
• Date: Obrigatório. Expressão de data a ser avaliada.

Configurações: O argumento interval pode ter os seguintes valores:

Formatos de Data Suportados:

• MM-DD-YYYY
• MM/DD/YYYY
• DD-MM-YYYY
• DD/MM/YYYY
• YYYY-MM-DD
• YYYY/MM/DD

Formato de Hora Suportado:

hh:mm:ss

Comentários

Você pode usar a função DatePart para avaliar uma data e retornar um intervalo de tempo específico. Por exemplo, você pode usar DatePart para calcular o dia da semana ou a hora atual.

Estes exemplos utilizam uma data e, com o uso da função DatePart, exibem o trimestre do ano em que ela ocorre.

Exemplo 1:

Function GetQuarter(TheDate)
GetQuarter = DatePart("q", TheDate)
End Function

Exemplo 2:

Dim MyDate, YearPart
MyDate = "21/01/2025"
YearPart = DatePart("yyyy", MyDate)
'Output: 2025

Exemplo 3:

Dim MyDate, MonthPart
MyDate = "21/01/2025"
MonthPart = DatePart("m", MyDate) 
'Output: MonthPart contains 1 (January)

Exemplo 4:

Dim MyDate, DayPart
MyDate = "21/01/2025"
DayPart = DatePart("d", MyDate) 
'Output: 21

Exemplo 5:

Dim MyDate, HourPart
MyDate = "21/01/2025 14:30:00" ' Includes time component.
HourPart = DatePart("h", MyDate) 
'Output: 14 (2 PM)

Exemplo 6:

Dim MyDate, MinutePart
MyDate = "21/01/2025 14:30:00" 
MinutePart = DatePart("n", MyDate) 
'Output: 30

Exemplo 7:

Dim MyDate, SecondPart
MyDate = "21/01/2025 14:30:00" ' Includes time component.
SecondPart = DatePart("s", MyDate) ' Returns the second part of the date.
'Output: 0