Après une soirée de test, voici ci joint le résultat (temporaire) obtenu.
J'ai utilisé une fonction différente de la tienne sylvanu, car les résultats escomptés ne collaient pas :
Function DecompteJoursAnnee(ByVal AnneeEtudiee As Variant, ByVal AireDates As Range) As Long
Dim I As Long
Dim...