Bonjour,

J'aimerais pouvoir calculer la différence (en mois) entre 2 dates depuis visual basic (mais dans access)

Voilà la fonction que j'ai créé, la plupart des fois ca fonctionne bien mais d'autre ca me donne un mois de trop!

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Public Function DiffDays(dtFirstDate As Date, dtSecondDate As Date) As Double
 
  Dim dblTemp As Double
  dblTemp = (dtSecondDate - dtFirstDate + 1#) / 30#   
  DiffDays = dblTemp
 
 
End Function
Par exemple entre le 01.03.2014 et le 30.10.2020 il me calcul 81.2 mois alors j'arrondi en dessous (81mois) mais il me reste toujours un mois de trop...

Pouvez-vous m'aider svp!?

Merci beaucoup d'avance!