Fonction DateAdd()

Résolu/Fermé
Bernarddd Messages postés 2 Date d'inscription dimanche 28 avril 2013 Statut Membre Dernière intervention 28 avril 2013 - 28 avril 2013 à 19:12
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 - 28 avril 2013 à 20:46
Bonsoir bonsoir,

Je me suis lancé depuis peu dans la programmation VBA. J'aimerais avoir votre aide sur un programme qui m'échappe.. !
Il m'est demandé décrire un programme avec un paramètre a, qui demande à un utilisateur une date de naissance et qui affiche dans un seul MsgBox la date (jj-mm-aaaa) des 1 000, 2 000, 3000, jusqu'à 10 000 jours après la date d'anniversaire indiquée.
Pour être mieux compris, si je suis né un 01/01/01, le programme devra me donner les dates précises auxquels je souhaiterais mon 1 000 eme jour, mon 2 000 eme jours etc !

Je n'arrive absolument pas à utiliser la fonction DateAdd() et de l'appliquer dans ce contexte.

Je vous serais très reconnaissant de votre aide !

Bernard
A voir également:

3 réponses

eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 7 239
28 avril 2013 à 20:46
Tu plaisantes ou quoi ?
Tu crois que je vais faire ton devoir que tu envoies en MP ?
Tu rêves...
Sort tes cours et sers toi de ta tête.
On est là pour aider, pas pour faire à ta place.
Abandon du suivi même si tu envoies le fichier xls de ce que tu as fait.

eric
2
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 7 239
28 avril 2013 à 19:35
Bonjour,

une date est un nombre pour excel.
Là fait juste a= ta_date+1000 puisque tu veux ajouter des jours.

eric
1
Bernarddd Messages postés 2 Date d'inscription dimanche 28 avril 2013 Statut Membre Dernière intervention 28 avril 2013 1
28 avril 2013 à 19:42
Merci pour votre réponse, cependante je n'arrive pas à comprendre ce que je dois mettre quand vous me dites "ta_date".

Au début de la macro, l'utilisateur doit donner une date, imaginons le 10 juin 2000, comment doit-je l'écrire dans le Msgbox et que dois-je mettre dans a = ta_date + 1000 ?

Bernard
1
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 7 239
Modifié par eriiic le 28/04/2013 à 20:05
Tout dépend comment tu récupères ta date, tu ne dis rien des conditions ni de ce que tu as fait.
Si c'est dans le code, dans une cellule, un inputbox ou un textbox ça ne sera pas pareil...

Un exemple :
Dim date1 As Date
date1 = #10/6/2000#
MsgBox date1 + 1000

Sinon déposer le fichier xls (réduit au nécessaire et anonymisé, avec les explications et éventuellement le résultat attendu) sur cjoint.com et coller ici le lien fourni.

eric
0