ATTENTION : Ca depend de la norme... Votre fonction est bonne pour les USA, pas en Europe... Si pour certaines annees la fonction proposée ne posera pas de pb, pour d'autres comme 2010 bonjour les degats...

Ex : Dans la majorité des calendriers européens le 01/01/2010 appartient à la semaine 53 de l'annee 2009.

Or DateDiff("w", DateSerial(Year("01/01/2010"), 1, 1), "01/01/2010") + 1 donne 1 ....

A méditer...