A função DatePart devolve uma parte específica de uma data.
Sintaxe:
DatePart (interval As String, date As Date [, firstDayOfWeek As Integer [, firstWeekOfYear As Integer]]) As Long
Valor de retorno:
The extracted part for the given date.
Parâmetros:
interval - A string expression from the following table, specifying the date interval.
interval (string value)
Explicação
yyyy
Ano
q
Trimestre
m
Mês
y
Dia do ano
w
Dia da semana
ww
Semana do ano
d
Dia
h
Hora
n
Minuto
s
Segundo
date - The date from which the result is calculated.
Os literais de data permitem especificar variáveis de data inequívocas que são independentes do idioma atual. Os literais são colocados entre os símbolos de cerquilha #. Os formatos possíveis são:
#yyyy-mm-dd#
#mm/dd/yyyy#
firstdayofweek: An optional parameter that specifies the starting day of a week.
firstdayofweek value
Explicação
0
Utilizar o valor do sistema
1
domingo (padrão)
2
segunda-feira
3
terça-feira
4
quarta-feira
5
quinta-feira
6
sexta-feira
7
sábado
firstweekofyear: An optional parameter that specifies the starting week of a year.
firstweekofyear value
Explicação
0
Utilizar o valor do sistema
1
Semana 1 é a semana de 1 de janeiro (padrão)
2
Semana 1 é a primeira semana que contém quatro ou mais dias desse ano
3
Semana 1 é a primeira semana que só contém dias do novo ano
Exemplo:
Sub example_datepart
MsgBox DatePart("ww", #01/02/2005#) ' displays 2 because weeks start on Sunday
MsgBox DatePart("ww", #12/31/2005#) ' displays 53
MsgBox DatePart(date:=#2005-12-30#, interval:="q") ' displays 4
End Sub
