Função DatePart
A função DatePart retorna uma parte específica de uma data.
Sintaxe:
DatePart (Add, Date [, Week_start [, Year_start]])
Valor de retorno:
Um Variant que contém uma data.
Parâmetros:
Add – Uma expressão de string a partir da seguinte tabela, especificando o intervalo de datas.
Add (valor do string)
|
Explicação
|
aaaa
|
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
|
Date - A data a partir da qual o resultado é calculado.
Week_start - Um parâmetro opcional que especifica o dia de início de uma semana.
Valor de Week_start
|
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
|
Year_start - Um parâmetro opcional que especifica a semana de início de um ano.
Valor de Year_start
|
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
|
Exemplo:
Sub example_datepart
MsgBox DatePart("ww", "12/31/2005")
End Sub