Função DatePart
A função DatePart devolve uma parte específica de uma data.
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.
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.
Date literals allow to specify unambiguous date variables that are independent from the current language. Literals are enclosed between hash signs #. Possible formats are:
-
#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
|
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