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

- - Dernière réponse : Charles Racaud
Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
- 1 nov. 2012 à 13:03
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
Afficher la suite 

1 réponse

Meilleure réponse
Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
25
3
Merci
Salut,

AddMonths accepte les nombres négatifs :

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



_____________
Kenji

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 200 internautes nous ont dit merci ce mois-ci

Commenter la réponse de Charles Racaud