Função DatePart

  • Artigo

Aviso

Há um problema com o uso dessa função. A última segunda-feira em alguns anos calendários pode ser retornada como semana 53, quando deve ser a semana 1. Para obter mais informações e uma solução alternativa, consulte Formato ou funções DatePart podem retornar o número da semana errada para a última segunda-feira no ano. Retorna uma Variant (Inteiro) que contém a parte especificada de uma determinada data.

Sintaxe

DatePart(interval, date, [ firstdayofweek, [ firstweekofyear ]])

A sintaxe da função DatePart tem estes argumentos nomeados:

Sair Descrição
intervalo Obrigatório. Expressão de cadeia de caracteres que é o intervalo de tempo que você deseja retornar.
data Obrigatório. Valor variant (Data) que você deseja avaliar.
primeirodiadasemana Opcional. Uma constante que especifica o primeiro dia da semana. Se não especificado, será usado o domingo.
primeirasemanadoano Opcional. Uma constante que especifica a primeira semana do ano. Se não especificada, será usada a semana em que ocorre 1º de janeiro.

Configurações

O argumentode intervalo tem essas configurações:

Configuração Descrição
aaaa Ano
t Trimestre
m Mês
a Dia do ano
d Dia
s Dia da semana
ss Semana
h Hora
m Minuto
s Segundo

O argumento primeirodiadasemana tem as seguintes configurações:

Constante Valor Descrição
vbUseSystem 0 Use a configuração da API NLS.
vbSunday 1 Domingo (padrão)
vbMonday 2 Segunda-feira
vbTuesday 3 Terça-feira
vbWednesday 4 Quarta-feira
vbThursday 5 Quinta-feira
vbFriday 6 Sexta-feira
vbSaturday 7 Sábado

O argumento firstweekofyear tem as seguintes configurações:

Constant Valor Descrição
vbUseSystem 0 Use a configuração da API NLS.
vbFirstJan1 1 Comece com a semana em que ocorre 1 de janeiro (padrão).
vbFirstFourDays 2 Comece com a primeira semana que tiver pelo menos quatro dias no novo ano.
vbFirstFullWeek 3 Comece com a primeira semana completa do ano.

Comentários

Use a função DatePart para avaliar uma data e retornar um intervalo de tempo específico. Por exemplo, você pode usar DatePart para calcular o dia da semana ou a hora atual.

O argumento primeirodiadasemana afeta cálculos que usam os símbolos de intervalo "s" e "ss".

Se a data for um literal de data, o ano especificado se tornará uma parte permanente dessa data. No entanto, se a data estiver entre aspas duplas (" "), e você omitir o ano, o ano atual será inserido em seu código sempre que a expressão de data for avaliada. Isso possibilita escrever um código que pode ser usado em anos diferentes.

Observação

Para date, quando a configuração da propriedade Calendar for Gregoriano, a data fornecida deverá ser gregoriana. Quando o calendário é Islâmico, a data fornecida deve ser Islâmica.

A parte de data retornada está nas unidades de período de tempo do calendário árabe atual. Por exemplo, se o calendário atual for Islâmico e a parte da data a ser retornada for o ano, o valor de year será um ano Islâmico.

Exemplo

Este exemplo usa uma data e, usando a função DatePart , exibe o trimestre do ano em que ela ocorre.

Dim TheDate As Date    ' Declare variables.
Dim Msg    
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

As funções Format ou DatePart podem retornar o número da semana errada para a última segunda-feira no ano