Applies ToAccess para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Retorna uma Variante (Data) que contém a data à qual o intervalo de tempo especificado foi adicionado.

Sintaxe

DateAdd ( intervalo, número, data )

A sintaxe da função DateAdd tem estes argumentos:

Argumento

Descrição

intervalo

Obrigatório. Expressão de cadeia que é o intervalo de tempo que pretende adicionar.

número

Obrigatório. Expressão numérica que corresponde ao número de intervalos que pretende adicionar. Pode ser positivo (para obter datas no futuro) ou negativo (para obter datas no passado).

data

Obrigatório. Variante (Data) ou literal que representa a data à qual o intervalo é adicionado.

Configurações

O intervaloargumento tem estas definiçõ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

Comentários

Pode utilizar a função DateAdd para adicionar ou subtrair um intervalo de tempo especificado de uma data. Por exemplo, pode utilizar DateAdd para calcular uma data de 30 dias a partir de hoje ou uma hora daqui a 45 minutos.

Para adicionar dias à data, pode utilizar o Dia do Ano ("y"), Dia ("d" ou Dia Da Semana ("w").

A função DateAdd não devolverá uma data inválida. O exemplo seguinte adiciona um mês a 31 de janeiro:

DateAdd("m", 1, "31-Jan-95")

Neste caso, DateAdd devolve 28-Fev-95, não 31-Fev-95. Se data for 31-Jan-96, devolve 29-Fev-96 porque 1996 é um ano bissexto.

Se a data calculada anteceder o ano 100 (ou seja, subtrair mais anos do que na data), ocorrerá um erro.

Se núm não for um valor Longo, é arredondado para o número inteiro mais próximo antes de ser avaliado.

Observação: O formato do valor devolvido para DateAdd é determinado pelas definições do Painel de Controlo e não pelo formato transmitido no argumento de data .

Observação: Para data, se a definição da propriedade Calendário for Gregoriano, a data fornecida tem de ser Gregoriana. Se o calendário for Hijri, a data fornecida tem de ser Hijri. Se os valores do mês forem nomes, o nome tem de ser consistente com a definição de propriedade Calendário atual. Para minimizar a possibilidade de nomes de mês entrarem em conflito com a definição de propriedade Calendário atual, introduza os valores de mês numéricos (formato de Data Abreviada).

Exemplos de consulta

Expressão

Resultados

SELECT DateAdd("YYYY",1,[DateofSale]) AS Expr1 FROM ProductSales;

Devolve os resultados ao adicionar 1 ano aos valores de data do campo "DateofSale".

SELECT DateAdd("YYYY",-1,[DateofSale]) AS Expr1 FROM ProductSales;

Devolve os resultados ao subtrair 1 ano aos valores de data do campo "DateofSale".

SELECT DateAdd("d",10,[DateofSale]) AS NewDate FROM ProductSales;

Devolve os resultados na coluna "NewDate" ao adicionar 10 dias aos valores de data do campo "DateofSale".

SELECT DateAdd("ww",-1,[DateofSale]) AS NewDate FROM ProductSales;

Devolve os resultados na coluna "NewDate" ao subtrair 1 semana (7 dias) dos valores de data do campo "DateofSale".

Exemplo de VBA

Observação: Os exemplos que se seguem demonstram a utilização desta função num módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, veja Access VBA reference (Referência do VBA do Access).

Este exemplo utiliza uma data como entrada e utiliza a função DateAdd para apresentar uma data correspondente, um número especificado de meses no futuro.

Dim FirstDate As Date    ' Declare variables.
Dim IntervalType As String
Dim Number As Integer
Dim Msg
IntervalType = "m"    ' "m" specifies months as interval.
FirstDate = InputBox("Enter a date")
Number = InputBox("Enter number of months to add")
Msg = "New date: " & _
    DateAdd(IntervalType, Number, FirstDate)
MsgBox Msg

Confira também

Escolher a função de data certa

Precisa de mais ajuda?

Quer mais opções

Explore os benefícios da assinatura, procure cursos de treinamento, saiba como proteger seu dispositivo e muito mais.

As comunidades ajudam você a fazer e responder perguntas, fazer comentários e ouvir especialistas com conhecimento avançado.