OVH Cloud OVH Cloud

compter le nombre de jours ouvrés

4 réponses
Avatar
danièle
Bonjour,=20

Je voudrais calculer le nombre de jours ouvr=E9s entre deux=20
dates.
Merci pour la r=E9ponse

D.C

4 réponses

Avatar
Gaël Schmitt [MS]
Bonjour,

Va voir là tu trouvera surement ton bonheur :
http://mypage.bluewin.ch/w.stucki/CalculsDates.htm

Gael.

"danièle" a écrit dans le message de
news:084401c3aa95$e568de50$
Bonjour,

Je voudrais calculer le nombre de jours ouvrés entre deux
dates.
Merci pour la réponse

D.C
Avatar
J-Pierre
Bonjour,

Les possibilités offertes par Walter sont très riches, peut-être trop pour ton problème.
Une autre possibilité, utiliser une table contenant une ligne par jour jusqu'en 2099, après, on s'en fout, avec le No du jour, le
Nom du jour, et l'indication des jours fériés. Après, un simple SELECT sur deux dates te renseigne.

Si ça t'intéresse, contacte-moi par mail, je t'envoie la table des jours fériés à partir de laquelle il est facile de créer la table
globale.

J-Pierre
Avatar
Gaël Schmitt [MS]
Sinon tu as aussi cette possibilité :
http://support.microsoft.com/default.aspx?idF9628

Gael.
"danièle" a écrit dans le message de
news:084401c3aa95$e568de50$
Bonjour,

Je voudrais calculer le nombre de jours ouvrés entre deux
dates.
Merci pour la réponse

D.C
Avatar
Anor
Bonjour,

Sinon, on peut faire commme ça (pas très optimisé, mais pas trouvé mieux ;-))

Sub test()
msgbox NbJoursOuvres(#1/1/2003#, #12/31/2003#)
End Sub


Function NbJoursOuvres(DateDebut As Date, DateFin As Date)
Dim DateTmp As Date
Dim cpt As Long
cpt = 0
For DateTmp = DateDebut To DateFin
If IsFerie(DateTmp) = False And Weekday(DateTmp) <> vbSunday And Weekday(DateTmp) <> vbSaturday
Then
cpt = cpt + 1
End If
Next DateTmp
NbJoursOuvres = cpt
End Function

Je ne sais plus si les samedi sont des jours ouvrés...mais bon...
Penser à récupérer la fonction IsFerie ici :
http://memoaccess.free.fr/dates.htm#ferie
--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------

J-Pierre :
| Bonjour,
|
| Les possibilités offertes par Walter sont très riches, peut-être trop
| pour ton problème.
| Une autre possibilité, utiliser une table contenant une ligne par
| jour jusqu'en 2099, après, on s'en fout, avec le No du jour, le Nom
| du jour, et l'indication des jours fériés. Après, un simple SELECT
| sur deux dates te renseigne.
|
| Si ça t'intéresse, contacte-moi par mail, je t'envoie la table des
| jours fériés à partir de laquelle il est facile de créer la table
| globale.
|
| J-Pierre