Função DatePart

Aplica-se a
Access para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Retorna uma Variante (Inteiro) que contém a parte especificada de uma determinada data.

Atenção Há um problema com o uso dessa função. A última segunda-feira em alguns anos civis pode ser retornada como semana 53 quando deveria ser a semana 1. Para obter mais informações e uma solução alternativa, consulte As funções Format ou DatePart podem retornar o número da semana incorreto para a última segunda-feira do ano.

Sintaxe

PartData(intervalo, data [, primeiro dia da semana] [, primeira semana do ano] )

A sintaxe da função PartData tem os seguintes argumentos:

Argumento Descrição
intervalo Obrigatório. Expressão de cadeia de caracteres que é o intervalo de tempo que você deseja retornar.
de data Obrigatório. Valor da variante (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 especificado, será usada a semana em que ocorre 1 de janeiro.

Configurações

O argumento interval tem estas configurações:

Configuração Descrição
aaaa Ano
q Trimestre
m Mês
nte misturada, Dia do ano
d Dia
w Dia da semana
ss Semana
h Hora
n Minuto
a a Segundo

O argumento firstdayofweek tem estas configurações:

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

O argumento firstweekofyear tem estas configurações:

Constante 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 tenha pelo menos quatro dias no ano novo.
vbFirstFullWeek 3 Comece com a primeira semana completa do ano.

Comentários

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

O argumento firstdayofweek afeta cálculos que usam os símbolos de intervalo "w" e "ww".

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

Observação

Para data, se a definição da propriedade Calendar for Gregoriano, a data fornecida tem de ser Gregoriana. Se o calendário for Hijri, a data fornecida tem de ser Hijri.

A parte da data devolvida está em unidades de período de tempo do calendário Árabe atual. Por exemplo, se o calendário atual for Hijri e a parte da data a devolver for o ano, o valor do ano é um ano Hijri.

Exemplos de consulta

Expressão. Resultados
SELECT DatePart("yyyy",[DateofSale]) COMO NewDate FROM ProductSales; Devolve o "Ano" dos valores de data do campo "DatadaVenda".
SELECT DatePart("q",[DateofSale]) COMO NewDate FROM ProductSales; Devolve o 'Trimestre' (baseado no ano do calendário) dos valores de data do campo "DatadaVenda".
SELECT DatePart("y",[DateofSale]) COMO NewDate FROM ProductSales; Devolve o "Dia do Ano" (1 a 365) dos valores de data do campo "DatadaVenda".
SELECT DatePart("d",[DateofSale]) COMO NewDate FROM ProductSales; Devolve o "Dia" dos valores de data do campo "DatadaVenda".
SELECT DatePart("w",[DateofSale]) COMO NewDate FROM ProductSales; Devolve o "Dia-semana" (de 1 a 7, em que 1 representa domingo) dos valores de data do campo "DatadaVenda".
SELECT DatePart("ww",[DatadaVenda]) COMO DataNova FROM ProductSales; Devolve o "Número da semana" (de 1 a 52) dos valores de data do campo "DatadaVenda".
SELECT DatePart("h",[DateTime]) COMO NewDate FROM ProductSales; Devolve a 'Hora' dos valores de data do campo "DataHora".
SELECT DatePart("n",[DateTime]) COMO NewDate FROM ProductSales; Devolve os "Minutos" dos valores de data do campo "DataHora".
SELECT DatePart("s",[DateTime]) COMO NewDate FROM ProductSales; Devolve os "segundos" dos valores de data do campo "DataHora".

Exemplo do VBA

Observação

Os exemplos seguintes demonstram a utilização desta função num módulo Visual Basic for Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Pesquisar e introduza um ou mais termos na caixa de pesquisa.

Este exemplo pega 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

Escolher a função de data certa