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.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
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
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
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
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
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
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