Como usar a função DateAdd no VBA?

A função `DateAdd` no VBA é usada para adicionar um intervalo de tempo específico a uma data e retornar a nova data. É muito útil quando você precisa calcular datas futuras ou passadas baseadas em um determinado período de tempo.

Aqui está a sintaxe básica da função `DateAdd`:

DateAdd(interval, number, date)

interval: Um string que representa o intervalo de tempo que você deseja adicionar. Pode ser um dos seguintes valores:

`”yyyy”` para anos
`”q”` para trimestres
`”m”` para meses
`”y”` ou `”d”` para dias
`”w”` para dias da semana
`”ww”` para semanas
`”h”` para horas
`”n”` para minutos
`”s”` para segundos

number: Um valor numérico que especifica quantos intervalos de tempo devem ser adicionados à data. Este número pode ser positivo (para datas futuras) ou negativo (para datas passadas).
date: A data inicial à qual você deseja adicionar o intervalo de tempo. Esta data pode ser um valor de data ou um tipo de variável que contém um valor de data.

Exemplo de uso da função `DateAdd`:

Sub ExemploDateAdd()
    Dim dataInicial As Date
    Dim novaData As Date
    
    ' Define a data inicial
    dataInicial = #10/15/2023#
    
    ' Adiciona 2 meses à data inicial
    novaData = DateAdd("m", 2, dataInicial)
    
    ' Exibe a nova data no Immediate Window
    Debug.Print "Nova Data: " & novaData
End Sub

Neste exemplo, a função `DateAdd` é usada para adicionar 2 meses à data `15 de outubro de 2023`, resultando na data `15 de dezembro de 2023`. Você pode modificar os parâmetros para ajustar o tipo de intervalo de tempo e quantos deles deseja adicionar ou subtrair da data inicial.

facebooklinkedin