En poursuivant votre navigation sur ce site, vous acceptez l'utilisation de cookies pour vous proposer des contenus et services adaptés. Mentions légales.

Recherche

Recherche

Les mémos

Je débute...

Visites

 1224218 visiteurs

 15 visiteurs en ligne

Nous contacter

Contact

FAQ

Déplier Fermer  Problèmes de Date

Syntaxe : fPremierJourSemaine(14, 2005)


Function fPremierJourSemaine(Semaine As Integer, annee As Integer) As Date

Dim Datetemp As Date

Datetemp = DateSerial(annee, 1, 1) + (Semaine - 1) * 7

fPremierJourSemaine = Datetemp - (Weekday(Datetemp) - vbMonday)

End Function


Dernière modification :02/02/2007 : 03:39 Hyperlien 

Vous êtes ici :   Accueil » FAQ