j'ai 3 champs au format heure,abregé
1)heure de départ
2)heure arrivée
3)total en heures et minutes
ex:
départ 10:37 arrivée 12:03
je voudrais afficher dans 3eme champ disons(x)
le temps écoulé y a t-il une formule ou un bout de code pour faire cela
merci de votre aide
ps: un autre probleme se pose ex
départ 23:37 arrivée 01:03 (du matin) que faire dans ce cas
??????merci de votre aide
lou
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, Avec ceci peut-être, à copier dans un module global:
Function fnTempsEcoule(Debut, Fin) As Date If IsNull(Debut) Or IsNull(Fin) Then fnTempsEcoule = 0 Exit Function End If Dim intHeure As Integer, intMinute As Integer, intLaps As Integer intLaps = DateDiff("n", [Debut], IIf([Fin] < [Debut], DateAdd("n", 1440, [Fin]), [Fin])) intHeure = intLaps 60 intMinute = intLaps Mod 60 fnTempsEcoule = intHeure & ":" & intMinute End Function
fonction que tu peux appeler dans une requête par: Durée de la tache: fnTempsEcoule([Depart];[Arrivee])
bonjour besoin d aide pour résoudre ce probleme
j'ai 3 champs au format heure,abregé 1)heure de départ 2)heure arrivée 3)total en heures et minutes ex: départ 10:37 arrivée 12:03 je voudrais afficher dans 3eme champ disons(x) le temps écoulé y a t-il une formule ou un bout de code pour faire cela merci de votre aide
ps: un autre probleme se pose ex
départ 23:37 arrivée 01:03 (du matin) que faire dans ce cas ??????merci de votre aide lou
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour,
Avec ceci peut-être, à copier dans un module global:
Function fnTempsEcoule(Debut, Fin) As Date
If IsNull(Debut) Or IsNull(Fin) Then
fnTempsEcoule = 0
Exit Function
End If
Dim intHeure As Integer, intMinute As Integer, intLaps As Integer
intLaps = DateDiff("n", [Debut], IIf([Fin] < [Debut], DateAdd("n",
1440, [Fin]), [Fin]))
intHeure = intLaps 60
intMinute = intLaps Mod 60
fnTempsEcoule = intHeure & ":" & intMinute
End Function
fonction que tu peux appeler dans une requête par:
Durée de la tache: fnTempsEcoule([Depart];[Arrivee])
bonjour
besoin d aide pour résoudre ce probleme
j'ai 3 champs au format heure,abregé
1)heure de départ
2)heure arrivée
3)total en heures et minutes
ex:
départ 10:37 arrivée 12:03
je voudrais afficher dans 3eme champ disons(x)
le temps écoulé y a t-il une formule ou un bout de code pour faire cela
merci de votre aide
ps: un autre probleme se pose ex
départ 23:37 arrivée 01:03 (du matin) que faire dans ce cas
??????merci de votre aide
lou
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour, Avec ceci peut-être, à copier dans un module global:
Function fnTempsEcoule(Debut, Fin) As Date If IsNull(Debut) Or IsNull(Fin) Then fnTempsEcoule = 0 Exit Function End If Dim intHeure As Integer, intMinute As Integer, intLaps As Integer intLaps = DateDiff("n", [Debut], IIf([Fin] < [Debut], DateAdd("n", 1440, [Fin]), [Fin])) intHeure = intLaps 60 intMinute = intLaps Mod 60 fnTempsEcoule = intHeure & ":" & intMinute End Function
fonction que tu peux appeler dans une requête par: Durée de la tache: fnTempsEcoule([Depart];[Arrivee])
bonjour besoin d aide pour résoudre ce probleme
j'ai 3 champs au format heure,abregé 1)heure de départ 2)heure arrivée 3)total en heures et minutes ex: départ 10:37 arrivée 12:03 je voudrais afficher dans 3eme champ disons(x) le temps écoulé y a t-il une formule ou un bout de code pour faire cela merci de votre aide
ps: un autre probleme se pose ex
départ 23:37 arrivée 01:03 (du matin) que faire dans ce cas ??????merci de votre aide lou
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
lou
C EST PARFAIT !!!!!
merci ERIC
"Eric" a écrit dans le message de news:
Bonjour, Avec ceci peut-être, à copier dans un module global:
Function fnTempsEcoule(Debut, Fin) As Date If IsNull(Debut) Or IsNull(Fin) Then fnTempsEcoule = 0 Exit Function End If Dim intHeure As Integer, intMinute As Integer, intLaps As Integer intLaps = DateDiff("n", [Debut], IIf([Fin] < [Debut], DateAdd("n", 1440, [Fin]), [Fin])) intHeure = intLaps 60 intMinute = intLaps Mod 60 fnTempsEcoule = intHeure & ":" & intMinute End Function
fonction que tu peux appeler dans une requête par: Durée de la tache: fnTempsEcoule([Depart];[Arrivee])
bonjour besoin d aide pour résoudre ce probleme
j'ai 3 champs au format heure,abregé 1)heure de départ 2)heure arrivée 3)total en heures et minutes ex: départ 10:37 arrivée 12:03 je voudrais afficher dans 3eme champ disons(x) le temps écoulé y a t-il une formule ou un bout de code pour faire cela merci de votre aide
ps: un autre probleme se pose ex
départ 23:37 arrivée 01:03 (du matin) que faire dans ce cas ??????merci de votre aide lou
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
C EST PARFAIT !!!!!
merci ERIC
"Eric" <f_framZZ@hotmail.com> a écrit dans le message de news:
u6goTPfFGHA.3532@TK2MSFTNGP14.phx.gbl...
Bonjour,
Avec ceci peut-être, à copier dans un module global:
Function fnTempsEcoule(Debut, Fin) As Date
If IsNull(Debut) Or IsNull(Fin) Then
fnTempsEcoule = 0
Exit Function
End If
Dim intHeure As Integer, intMinute As Integer, intLaps As Integer
intLaps = DateDiff("n", [Debut], IIf([Fin] < [Debut], DateAdd("n",
1440, [Fin]), [Fin]))
intHeure = intLaps 60
intMinute = intLaps Mod 60
fnTempsEcoule = intHeure & ":" & intMinute
End Function
fonction que tu peux appeler dans une requête par:
Durée de la tache: fnTempsEcoule([Depart];[Arrivee])
bonjour
besoin d aide pour résoudre ce probleme
j'ai 3 champs au format heure,abregé
1)heure de départ
2)heure arrivée
3)total en heures et minutes
ex:
départ 10:37 arrivée 12:03
je voudrais afficher dans 3eme champ disons(x)
le temps écoulé y a t-il une formule ou un bout de code pour faire cela
merci de votre aide
ps: un autre probleme se pose ex
départ 23:37 arrivée 01:03 (du matin) que faire dans ce cas
??????merci de votre aide
lou
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour, Avec ceci peut-être, à copier dans un module global:
Function fnTempsEcoule(Debut, Fin) As Date If IsNull(Debut) Or IsNull(Fin) Then fnTempsEcoule = 0 Exit Function End If Dim intHeure As Integer, intMinute As Integer, intLaps As Integer intLaps = DateDiff("n", [Debut], IIf([Fin] < [Debut], DateAdd("n", 1440, [Fin]), [Fin])) intHeure = intLaps 60 intMinute = intLaps Mod 60 fnTempsEcoule = intHeure & ":" & intMinute End Function
fonction que tu peux appeler dans une requête par: Durée de la tache: fnTempsEcoule([Depart];[Arrivee])
bonjour besoin d aide pour résoudre ce probleme
j'ai 3 champs au format heure,abregé 1)heure de départ 2)heure arrivée 3)total en heures et minutes ex: départ 10:37 arrivée 12:03 je voudrais afficher dans 3eme champ disons(x) le temps écoulé y a t-il une formule ou un bout de code pour faire cela merci de votre aide
ps: un autre probleme se pose ex
départ 23:37 arrivée 01:03 (du matin) que faire dans ce cas ??????merci de votre aide lou
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr