Função DateDiff

Importante :  Este artigo foi traduzido por um sistema de tradução automática, leia o aviso de isenção de responsabilidade. Para sua referência, veja a versão em inglês deste artigo aqui.

Retorna uma Variante (Longo) que especifica o número de intervalos de tempo entre as duas datas especificadas.

Veja alguns exemplos

Sintaxe

DateDiff ( intervalo, Data1, data2 [, primeirodiadasemana] [, primeirasemanadoano] )

A sintaxe da função DifData possui os seguintes argumentos:

Dica : No Access 2010, o construtor de expressões tem IntelliSense, assim você pode ver quais argumentos requer sua expressão.

Argumento

Descrição

intervalo

Necessário. Expressão de cadeia de caracteres que é o intervalo de tempo usado para calcular a diferença entre Data1 e data2.

Data1, data2

Necessário. Variant (Data). Duas datas que você deseja usar no cálculo.

primeirodiadasemana

Opcional. Um constant que especifica o primeiro dia da semana. Se não especificado, domingo será considerado.

primeirasemanadoano

Opcional. Uma constante que especifica a primeira semana do ano. Se não especificado, a primeira semana será considerada sejam semana na qual 1º de janeiro.


Configurações

O intervaloargument possui estas 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

Exemplo de número de telefone do Lync que mostra um formato internacional de discagem

Hora

Ativar ou desativar caracteres não imprimíveis

Minuto

s

Segundo


Início da página

O argumento primeirodiadasemana possui estas configurações:

Constante

Valor

Descrição

vbUseSystem

0

Use a configuração de 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


Constante

Valor

Descrição

vbUseSystem

0

Use a configuração de API NLS.

vbFirstJan1

1

Comece com a semana na qual 1º de janeiro ocorre (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 DifData para determinar quantos intervalos de tempo especificados existem entre duas datas. Por exemplo, você pode usar DifData para calcular o número de dias entre duas datas ou o número de semanas entre hoje e o final do ano.

Para calcular o número de dias entre Data1 e data2, você pode usar dia do ano ("y") ou dia ("d"). Quando o intervalo for Weekday ("w"), DifData retorna o número de semanas entre as duas datas. Se Data1 cai na segunda-feira, DifData conta o número de segundas-feiras até data2. Ele conta data2 , mas não Data1. Se o intervalo for semana ("ss"), no entanto, a função DifData retorna o número de semanas do calendário entre as duas datas. Ele conta o número de domingos entre Data1 e data2. DifData contará data2 se ele for um domingo; mas não contará Data1, mesmo se ele se situar em um domingo.

Se Data1 se refere a um ponto posterior no horário de data2, a função DifData retornará um número negativo.

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

Se Data1 ou data2 for uma date literal, o ano especificado torna-se parte permanente dessa data. No entanto, se Data1 ou data2 está entre aspas duplas ("") e você omitir o ano, o ano atual será inserido no seu código sempre que a expressão Data1 ou data2 é avaliada. Isso possibilita escrever código que pode ser usado em anos diferentes.

Ao comparar 31 de dezembro de 1 de janeiro do ano imediatamente posterior, DifData para ano ("yyyy") retorna 1, mesmo que somente um dia decorrido.

Observação : Para Data1 e data2, se a configuração de propriedade de calendário for Gregoriano, a data fornecida deverá ser gregoriano. Se o calendário for Islâmico, a data fornecida deverá ser islâmico.

Início da página

Exemplos

Use a função DifData em uma expressão     Você pode usar a função DifData sempre que você pode usar expressões. Por exemplo, suponha que você tenha um formulário que você usa para atender aos pedidos do cliente. Na tabela Pedidos, você tem um campo chamado ReceiveBefore que contém a data pelo qual o cliente precisa receber a ordem. Você pode usar a função DifData com uma caixa de texto no formulário para exibir o número de dias antes da ordem deve entregar a esquerda.

Você considerando que leva dez dias para enviar qualquer ordem, defina a propriedade Fonte do controle da caixa de texto da seguinte maneira:

= DateDiff("d", Now(), [Orders].[ ReceiveBefore]) -10

Quando você abre o formulário no modo formulário, a caixa de texto exibe o número de dias antes da ordem deve entregar a esquerda. Se houver menos de 10 dias para a esquerda antes do cliente precisa receber a ordem, o número na caixa de texto é negativo e indica quantos dias atrasado será a ordem se ele for enviado imediatamente.

Use a função DifData no código VBA   

Observação : Exemplos a seguir demonstram o uso dessa função em um Visual Basic para módulo Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione a Referência do desenvolvedor na lista suspensa ao lado de pesquisa e insira um ou mais termos na caixa de pesquisa.

Este exemplo usa a função DifData para exibir o número de dias entre uma determinada data e hoje.

Dim TheDate As Date    ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date")
Msg = "Days from today: " & DateDiff("d", Now, TheDate)
MsgBox Msg

Observação : Aviso de Isenção de Tradução Automática: Este artigo foi traduzido por computador, sem intervenção humana. A Microsoft oferece essas traduções automáticas para ajudar as pessoas que não falam inglês a aproveitar os textos escritos sobre produtos, serviços e tecnologias da Microsoft. Como este artigo foi traduzido automaticamente, é possível que contenha erros de vocabulário, sintaxe ou gramática.

Expanda suas habilidades
Explore o treinamento
Obtenha novos recursos primeiro
Ingressar no Office Insider

Essas informações foram úteis?

Obrigado por seus comentários!

Agradecemos pelos seus comentários! Parece que pode ser útil conectar você a um de nossos agentes de suporte do Office.

×