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:
A parte extraída para a data indicada.
Parâmetros:
intervalo - Uma expressão de cadeia de caracteres da tabela seguinte, que especifica o intervalo de datas.
intervalo (valor de cadeia de caracteres)
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
data - A data a partir da qual o resultado é calculado.
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: Um parâmetro opcional que especifica o dia em que começa a semana.
valor do primeiro dia da semana
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: Um parâmetro opcional que especifica a semana inicial de um ano.
valor da primeira semana do ano
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
