Renvoie une donnée de type Variante (Date) contenant une date à laquelle l’intervalle de temps spécifié a été ajouté.
Syntaxe
DateAdd (intervalle, nombre, date)
La syntaxe de la fonction Add a les arguments suivantes :
|
Argument |
Description |
|
intervalle |
Obligatoire. Expression de chaîne qui est l’intervalle de temps que vous voulez ajouter. |
|
nombre |
Obligatoire. Expression numérique qui est le nombre d’intervalles que vous voulez ajouter. Peut être positive (pour obtenir des dates futures) ou négative (pour obtenir des dates passées). |
|
date |
Obligatoire. Variante(Date)ou valeur littérale représentant la date à laquelle l’intervalle est ajouté. |
Conseil : Dans Access 2010, le Générateur d’expressions IntelliSense pour vous aider à voir les arguments dont votre expression a besoin.
Paramètres
L’intervalle argument ces paramètres :
|
Paramètre |
Description |
|
aaaa |
Année |
|
q |
Trimestre |
|
m |
Mois |
|
a |
Jour de l’année |
|
j |
Jour |
|
w |
Weekday |
|
ss |
Semaine |
|
h |
Heure |
|
n |
Minute |
|
s |
Seconde |
Remarques
Vous pouvez utiliser la fonction Add date pour ajouter ou soustraire un intervalle de temps spécifié à partir d’une date. Par exemple, vous pouvez utiliser Add date pour calculer une date dans 30 jours à partir d’aujourd’hui ou une heure dans 45 minutes.
Pour ajouter des jours à la date,vous pouvez utiliser Jour de l’année (« a »), Jour (« j ») ou Jours de la semaine (« w »).
La fonction Add date ne retourne pas de date non valide. L’exemple suivant ajoute un mois au 31 janvier :
DateAdd("m", 1, "31-Jan-95")
Dans ce cas, DateAdd renvoie le 28 février 95, et non le 31 février 2015. Si la date est le 31 janvier 2016, la date 29-fév-96 est une année bissextile 1996.
Si la date calculée précède l’année 100 (autrement dit, si vous soustrayez plus d’années que la date),une erreur se produit.
Si nombre n’est pas une valeur Longue, il est arrondi au nombre entier le plus proche avant d’être évalué.
Remarque : Le format de la valeur de retour de Ad est déterminé par les paramètres du Panneau de configuration, et non par le format transmis dans l’argument date.
Remarque : Pour la date,si la définition de propriété Calendrier est grégorien, la date fournie doit être grégorien. Si le calendrier est islamique (Hijri), la date fournie doit être le calendrier islamique (Hijri). Si les valeurs de mois sont des noms, le nom doit être cohérent avec le paramètre de propriété Calendrier actuel. Pour réduire l’éventualité que des noms de mois entrent en conflit avec la définition de propriété Calendrier actuelle, entrez des valeurs de mois numériques (format Date courte).
Exemples de requête
|
Expression |
Résultats |
|
SELECT DateAdd(« YYYY »,1,[DateofSale]) AS Expr1 FROM ProductSales; |
Renvoie les résultats en ajoutant 1 an aux valeurs de date du champ « DateofSale ». |
|
SELECT DateAdd(« YYYY »,-1,[DateofSale]) AS Expr1 FROM ProductSales; |
Renvoie les résultats en soustrayant 1 an aux valeurs de date du champ « DateofSale ». |
|
SELECT DateAdd(« j »,10,[DateofSale]) AS NewDate FROM ProductSales; |
Renvoie les résultats de la colonne « NewDate » en ajoutant 10 jours aux valeurs de date du champ « DateofSale ». |
|
SELECT DateAdd(« ww »,-1,[DateofSale]) AS NewDate FROM ProductSales; |
Renvoie les résultats de la colonne « DateDate » en soustrayant 1 semaine (7 jours) des valeurs de date du champ « DateofSale ». |
Exemple de VBA
Remarque : Les exemples qui suivent illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’travail avec VBA, sélectionnez Référence du développeur dans la liste de listes en regard de Rechercher, puis entrez un ou plusieurs termes dans la zone de recherche.
Cet exemple utilise une date comme entrée et utilise la fonction Add date pour afficher une date correspondante d’un nombre spécifié de mois dans le futur.
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
