Dattediff sans jour de week end
Fermé
omen123123
Messages postés
51
Date d'inscription
lundi 7 septembre 2015
Statut
Membre
Dernière intervention
1 mars 2019
-
Modifié par omen123123 le 13/02/2017 à 15:39
UDH - 23 mai 2017 à 01:04
UDH - 23 mai 2017 à 01:04
A voir également:
- Dattediff sans jour de week end
- Mettre à jour ses pilotes - Guide
- Mise a jour airpods - Guide
- Mise a jour windows 10 - Guide
- Mise a jour xiaomi - Guide
- Mise a jour chromecast - Guide
2 réponses
forum92
Messages postés
220
Date d'inscription
lundi 6 juillet 2015
Statut
Membre
Dernière intervention
14 août 2018
133
13 mai 2017 à 19:28
13 mai 2017 à 19:28
Bonjour,
A mon avis, tu peux le faire en plusieurs étapes :
1 - datadiff(date1,date2) = Nombre1
2- calcul le nombre de semaines entre ces deux dates. = nombre2
3 - nombre1 - ( nombre2 *2)
A mon avis, tu peux le faire en plusieurs étapes :
1 - datadiff(date1,date2) = Nombre1
2- calcul le nombre de semaines entre ces deux dates. = nombre2
3 - nombre1 - ( nombre2 *2)
Il faudra passer par du vba.
Tu peux aussi, si cela t'intéresse, retirer les jours fériés (profites, c open ;) ).
Tu crées un module, et tu appelles la fonction inclue dans ce module dans une requête :
Donc, dans ta requête, tu mets =calcul_jours_semaine(ta_date1, ta date2).
Good ??
Tu peux aussi, si cela t'intéresse, retirer les jours fériés (profites, c open ;) ).
Tu crées un module, et tu appelles la fonction inclue dans ce module dans une requête :
Function calcul_jours_semaine (debutDate As Variant, finDate As Variant) As Variant
Dim dt As Date
dt = debutDate
calcul_jours_semaine = 0
While dt <= finDate
If DatePart("w", dt, vbMonday) < 6 Then
calcul_jours_semaine = calcul_jours_semaine + 1
End If
dt = DateAdd("d", 1, dt)
Wend
Exit Function
End Function
Donc, dans ta requête, tu mets =calcul_jours_semaine(ta_date1, ta date2).
Good ??
