Transformation de date en VBA
4
Salut à tous,
le site est super, on y trouve plein d'astuce, vous pourrez peut-être m'aider
merci de vous pencher sur mon problème
avec un INPUT je saisis une date au format jj/mm/aaaa
exemple ok="02/10/2007"
pour l'agrémenter de 7 jours sur plusieurs mois, je fais tourné une boucle
dim table(25)
cpt=0
for i= 640 to 717 step 7
cpt=cpt+1
table(cpt)=ok+(7*cpt)
next
cette boucle ne fonctionne pas, mais la suivante fonctionne très bien
cpt = 0
For i = 640 To 717 Step 7
cpt = cpt + 1
table(cpt) = #10/2/2007# + (7 * cpt)
Next
comment passer suite à une saisie de "02/10/2007" à #10/2/2007#
N
Bonjour,
Dans ton code remplace
table(cpt)=ok+(7*cpt) par:
table(cpt)=CDate(ok) + (7 * cpt)A te lire
Dan
4
merci pour cette réponse ultra rapide, je vais desuite l'essayer
Amicalement...