Soustraire un moi d'une date [Résolu]

Signaler
-
Charles Racaud
Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
-
Bonjour,
j'ai une liste qu'il faut que je la remplisse avec des dates à partir de la date du jour, et en allant vers l'arrière chaque fois d'un moi.
Bon pour ajouter un moi à une date j'utilise:
   Dim dat As Date = Now
  MsgBox(dat.AddMonths(1))

Mais moi je veux faire le contraire de ctte manup sans décomposer la date comme ça:
 Dim dat As Integer = Now.Month - 1

parceque je risque d'avoir une erreur par rapport à l'année
Merci de m'aider

1 réponse

Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
27
Salut,

AddMonths accepte les nombres négatifs :

Dim dat As Date = Now
MsgBox(dat.AddMonths(-1))



_____________
Kenji