OVH Cloud OVH Cloud

Différence de dates / calcul en heures

2 réponses
Avatar
CybSnoopy
Bonjour,

Je dois effectuer la somme de différences de dates (format jj/mm/aaaa hh:mm)
en heures.

J'ai essayé d'appliquer le format utilisé dans Excel pour les totaux
d'heures dépassant 24h ([hh]:mm) mais cela n'a pas l'air de fonctionner sous
Access.

Merci de votre aide et ... de très bonnes Fêtes !

Snoopy

2 réponses

Avatar
Eric
Bonjour Snoopy,

Une piste peut-être,
Dans la requête faire un calcul de différence de temps avec la fonction
DiffDate() avec comme intervalle la minute, exemple:
DiffDate("n";[JHMD];[JHMF]) où JHMD et JHMF représentent tes champs
puis convertir cette différence en heures minutes.
La fonction ci-dessous te retourne le résultat sous forme décimale mais
tu trouveras des fonctions affichant le temps en heures et minutes ici :
http://mypage.bluewin.ch/w.stucki/CalculsDates.htm

Function fnHeureMinute(UneValeur As Long) As Double
Dim lngHeure As Long, lngMinute As Byte
lngHeure = UneValeur 60
lngMinute = UneValeur Mod 60
fnHeureMinute = lngHeure + lngMinute / 60
End Function

Bonjour,

Je dois effectuer la somme de différences de dates (format jj/mm/aaaa hh:mm)
en heures.

J'ai essayé d'appliquer le format utilisé dans Excel pour les totaux
d'heures dépassant 24h ([hh]:mm) mais cela n'a pas l'air de fonctionner sous
Access.

Merci de votre aide et ... de très bonnes Fêtes !

Snoopy


--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
CybSnoopy
Hello Eric,

Merci beaucoup de cette piste que je vais suivre.

Très bonnes fêtes !

Snoopy


Bonjour Snoopy,

Une piste peut-être,
Dans la requête faire un calcul de différence de temps avec la fonction
DiffDate() avec comme intervalle la minute, exemple:
DiffDate("n";[JHMD];[JHMF]) où JHMD et JHMF représentent tes champs
puis convertir cette différence en heures minutes.
La fonction ci-dessous te retourne le résultat sous forme décimale mais
tu trouveras des fonctions affichant le temps en heures et minutes ici :
http://mypage.bluewin.ch/w.stucki/CalculsDates.htm

Function fnHeureMinute(UneValeur As Long) As Double
Dim lngHeure As Long, lngMinute As Byte
lngHeure = UneValeur 60
lngMinute = UneValeur Mod 60
fnHeureMinute = lngHeure + lngMinute / 60
End Function

Bonjour,

Je dois effectuer la somme de différences de dates (format jj/mm/aaaa hh:mm)
en heures.

J'ai essayé d'appliquer le format utilisé dans Excel pour les totaux
d'heures dépassant 24h ([hh]:mm) mais cela n'a pas l'air de fonctionner sous
Access.

Merci de votre aide et ... de très bonnes Fêtes !

Snoopy


--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr