Problème de logique, VBA Fermé

Question

Bonjour, 


j'ai un problème. Pas vraiment de programmation en tant que telle mais surtout de logique.
En fait, je dois developper un soft en vba qui génère des graphique dans excel à partir d'autres fichiers excel.
J'ai créer un formulaire qui permet de sélectionner une usine, le mois de début du graph et le mois de fin.

Ensuite, je vérifie si les fichiers correspondant au mois de début et de fin existent.
Seul soucis, c'est entre ces deux mois...
Pour ceux-ci, je sais donc le mois et l'année, sous forme de chiffre.

Par exemple, si ils veulent que leur graph commence en janvier 2009 et se termine en février 2010. Mon formulaire me retourne le mois et l'année. Donc par exemple :
- MoisDebut = 01
- AnneeDebut = 2009
- MoisFin = 02
- MoisFin = 2010

Mais comment obtenir : février 2009, mars 2009, ... et ainsi de suite?
Lorsque j'aurai cela, je pourrai vérifier si les fichiers y afférants existent et générer mon graphique.


Je vous remercie d'avance.

thev · Answer

insérer le code suivant :


année_début = 2009
mois_début = 1
année_fin = 2010
mois_fin = 2
date_début = DateSerial(année_début, mois_début, 1)
date_fin = DateSerial(année_fin, mois_fin, 1)

For i = 0 To DateDiff("m", date_début, date_fin)
    date_i = DateAdd("m", i, date_début)
    mmaaaa = Format(date_i, "mmyyyy")
Next

Problème de logique, VBA

1 réponse

Discussions similaires