Função DatePart
A função DatePart retorna 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:
A parte extraída para a data informada.
interval - Uma expressão de string da tabela a seguir, especificando o intervalo de datas.
|
intervalo (valor da string)
|
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
|
Segundos
|
Data - A data a partir da qual o resultado é calculado.
Literais de data permitem especificar variáveis de data inequívocas que são independentes do idioma atual. Os literais são colocados entre cerquilhas #. Os formatos possíveis são:
-
#yyyy-mm-dd#
-
#mm/dd/yyyy#
firstdayofweek - Um parâmetro opcional que especifica o primeiro dia da semana.
|
Valor firstdayofweek
|
Explicação
|
|
0
|
Use o valor padrão 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 primeira semana de um ano.
|
Valor firstweekofyear
|
Explicação
|
|
0
|
Use o valor padrão do sistema
|
|
1
|
A semana 1 é a semana com 1ro de janeiro (padrão)
|
|
2
|
A semana 1 é a primeira semana que contém quatro ou mais dias desse ano
|
|
3
|
A semana 1 é a primeira semana que contém somente dias do ano novo
|
Sub example_datepart
MsgBox DatePart("ww", #12/31/2005#)
MsgBox DatePart(date:=#1999-12-30#, interval:="q")
End Sub