cs_Jordel
Messages postés27Date d'inscriptionvendredi 1 février 2002StatutMembreDernière intervention14 décembre 2007
-
6 déc. 2007 à 16:40
cs_Jordel
Messages postés27Date d'inscriptionvendredi 1 février 2002StatutMembreDernière intervention14 décembre 2007
-
7 déc. 2007 à 09:56
Bonjour,
Désolé pour le titre pas très explicite... mais je ne sais pas trop comment présenter mon soucis.
Alors... Dans mon projet, j'ai une période définie par l'utilisateur identifiée par datedébut et datefin.
Et selon ces 2 dates, je dois afficher à l'écran un tableur (SPREAD) avec en entête les jours ouvrés entre ces 2 dates...
Et je ne sais pas trop par où commencer pour identifier les jours ouvrés.
Si vous avez des pistes, n'hésitez pas !!! ;)
cs_Jordel
Messages postés27Date d'inscriptionvendredi 1 février 2002StatutMembreDernière intervention14 décembre 2007 7 déc. 2007 à 09:56
Hello,
Merci :)
J'ai trouvé des choses sympas sur le net après quelques recherches :)
Je me suis inspiré de ce code pour effectuer mes traitements :
Public Function nombre_jour_ouvre(ByVal date1 As String, ByVal date2 As String) As Double
Dim nb, nb_ouvre As Integer
Dim jour, date3 As String
nb = DateDiff("d", date1, date2)
nb_ouvre = 0
For i = 0 To nb
date3 = DateAdd("d", i, date1)
jour = Format(date3, "dddd")
If jour <> "samedi" And jour <> "dimanche" Then
nb_ouvre = nb_ouvre + 1
End If
Next