Nombre de mois dans une période

[F.Salenko]

Question bête :

je voudrais obtenir le nombre de mois contenu dans une période :

Code :

1
2
3
4
5
6
 
Dim Date1 as date
Dim Date2 as date
Dim MoisFrequence as Integer
 
MoisFrequence = (Date2 - Date1) / Month()

Enfin bef, j'ai essayé plusieurs techniques sans succès si vous pouviez m'aider...

Merci.

[jpcheck]

salut,

ici tu parles de mois civils (exemple de janvier a juin)
ou bien de mois calendaires (exemple 6) ?


Si tu pars sur un nombre de mois entre 2 dates tu peux utiliser DateDiff qui te donnera la duree.

voir l'aide ne ligne pour la syntaxe

Si tu veux le nombre de mois qui sont entames par tes deux dates tu peux faire un datediff avec le 1er de chacun de ces mois

Code :

1
2
3
4
5
6
7
Dim Date1 as date
Dim Date2 as date
Dim MoisFrequence as Integer
'cas 1
Debug.Print DateDiff("m",Date1,Date2)
'cas 2
Debug.Print DateDiff("m",Daserial(year(date1),Month(date1),1),Dateserial(year(date2),Month(date2),1))