Bonjour,
QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail)
sachant que ces heures sont écritesde cette façon dans une cellule :
10-18:30
ce qui doit donner 8:30 dans la cellule des résultats.
par avance merci
--
Joseph DENOUAL
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
Patrick BASTARD
Bonjour, *Joseph DENOUAL*
10-18:30 en B3 =CNUM(DROITE(B3;5))-CNUM(GAUCHE(B3;2)&":") cellule au format hh:mm renvoie 8:30
Mais il existe probablement plus simple.
-- Bien amicordialement, P. Bastard
Bonjour, QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail) sachant que ces heures sont écritesde cette façon dans une cellule : 10-18:30 ce qui doit donner 8:30 dans la cellule des résultats. par avance merci
Bonjour, *Joseph DENOUAL*
10-18:30 en B3
=CNUM(DROITE(B3;5))-CNUM(GAUCHE(B3;2)&":")
cellule au format hh:mm renvoie 8:30
Mais il existe probablement plus simple.
--
Bien amicordialement,
P. Bastard
Bonjour,
QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail)
sachant que ces heures sont écritesde cette façon dans une cellule :
10-18:30
ce qui doit donner 8:30 dans la cellule des résultats.
par avance merci
10-18:30 en B3 =CNUM(DROITE(B3;5))-CNUM(GAUCHE(B3;2)&":") cellule au format hh:mm renvoie 8:30
Mais il existe probablement plus simple.
-- Bien amicordialement, P. Bastard
Bonjour, QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail) sachant que ces heures sont écritesde cette façon dans une cellule : 10-18:30 ce qui doit donner 8:30 dans la cellule des résultats. par avance merci
AV
<| sachant que ces heures sont écritesde cette façon dans une cellule : <| 10-18:30
Pour que le résultat soit compatible avec ce type de données (A1:A4) dans une seule cellule : 10-18:30 10:30-18 10-20 7:30-12:15
Sur 1 ligne : =SI(ESTERR(TROUVE(":";STXT(A1;TROUVE("-";A1)+1;9^9)));(STXT(A1;TROUVE("-";A1)+1;9^9))&":";(STXT(A1;TROUVE("-";A1)+1;9^9)))-SI(ESTERR(TROUVE(":";GAUCHE(A1;TROUVE("-";A1)-1)));GAUCHE(A1;TROUVE("-";A1)-1)&":";GAUCHE(A1;TROUVE("-";A1)-1))
AV
<| sachant que ces heures sont écritesde cette façon dans une cellule :
<| 10-18:30
Pour que le résultat soit compatible avec ce type de données (A1:A4) dans
une seule cellule :
10-18:30
10:30-18
10-20
7:30-12:15
Sur 1 ligne :
=SI(ESTERR(TROUVE(":";STXT(A1;TROUVE("-";A1)+1;9^9)));(STXT(A1;TROUVE("-";A1)+1;9^9))&":";(STXT(A1;TROUVE("-";A1)+1;9^9)))-SI(ESTERR(TROUVE(":";GAUCHE(A1;TROUVE("-";A1)-1)));GAUCHE(A1;TROUVE("-";A1)-1)&":";GAUCHE(A1;TROUVE("-";A1)-1))
<| sachant que ces heures sont écritesde cette façon dans une cellule : <| 10-18:30
Pour que le résultat soit compatible avec ce type de données (A1:A4) dans une seule cellule : 10-18:30 10:30-18 10-20 7:30-12:15
Sur 1 ligne : =SI(ESTERR(TROUVE(":";STXT(A1;TROUVE("-";A1)+1;9^9)));(STXT(A1;TROUVE("-";A1)+1;9^9))&":";(STXT(A1;TROUVE("-";A1)+1;9^9)))-SI(ESTERR(TROUVE(":";GAUCHE(A1;TROUVE("-";A1)-1)));GAUCHE(A1;TROUVE("-";A1)-1)&":";GAUCHE(A1;TROUVE("-";A1)-1))
AV
michdenis
Bonjour Joseph,
Tu peux utiliser une fonction personnalisée comme celle-ci que tu copies dans un module standard : '--------------------- Function HDiff(rg As Range) Dim E As Variant E = Split(rg, "-") For A = 0 To UBound(E) If InStr(1, E(A), ":", vbTextCompare) = 0 Then E(A) = E(A) & ":00" End If Next HDiff = Abs(CDate(E(0)) - CDate(E(1))) End Function '---------------------
Et dans la cellule, tu écris : = HDiff(a1)
Salutations!
"Joseph DENOUAL" a écrit dans le message de news: %
Bonjour, QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail) sachant que ces heures sont écritesde cette façon dans une cellule : 10-18:30 ce qui doit donner 8:30 dans la cellule des résultats. par avance merci -- Joseph DENOUAL
Bonjour Joseph,
Tu peux utiliser une fonction personnalisée
comme celle-ci que tu copies dans un module
standard :
'---------------------
Function HDiff(rg As Range)
Dim E As Variant
E = Split(rg, "-")
For A = 0 To UBound(E)
If InStr(1, E(A), ":", vbTextCompare) = 0 Then
E(A) = E(A) & ":00"
End If
Next
HDiff = Abs(CDate(E(0)) - CDate(E(1)))
End Function
'---------------------
Et dans la cellule, tu écris : = HDiff(a1)
Salutations!
"Joseph DENOUAL" <joseph.denoual3@libertysurf.fr> a écrit dans le message de news: %23rPc4joHGHA.3936@TK2MSFTNGP12.phx.gbl...
Bonjour,
QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail)
sachant que ces heures sont écritesde cette façon dans une cellule :
10-18:30
ce qui doit donner 8:30 dans la cellule des résultats.
par avance merci
--
Joseph DENOUAL
Tu peux utiliser une fonction personnalisée comme celle-ci que tu copies dans un module standard : '--------------------- Function HDiff(rg As Range) Dim E As Variant E = Split(rg, "-") For A = 0 To UBound(E) If InStr(1, E(A), ":", vbTextCompare) = 0 Then E(A) = E(A) & ":00" End If Next HDiff = Abs(CDate(E(0)) - CDate(E(1))) End Function '---------------------
Et dans la cellule, tu écris : = HDiff(a1)
Salutations!
"Joseph DENOUAL" a écrit dans le message de news: %
Bonjour, QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail) sachant que ces heures sont écritesde cette façon dans une cellule : 10-18:30 ce qui doit donner 8:30 dans la cellule des résultats. par avance merci -- Joseph DENOUAL
michdenis
J'ai oublié de mentionné que tu dois appliquer le format de cellule avec lequel tu désires afficher le résultat.
Salutations!
"michdenis" a écrit dans le message de news: Bonjour Joseph,
Tu peux utiliser une fonction personnalisée comme celle-ci que tu copies dans un module standard : '--------------------- Function HDiff(rg As Range) Dim E As Variant E = Split(rg, "-") For A = 0 To UBound(E) If InStr(1, E(A), ":", vbTextCompare) = 0 Then E(A) = E(A) & ":00" End If Next HDiff = Abs(CDate(E(0)) - CDate(E(1))) End Function '---------------------
Et dans la cellule, tu écris : = HDiff(a1)
Salutations!
"Joseph DENOUAL" a écrit dans le message de news: %
Bonjour, QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail) sachant que ces heures sont écritesde cette façon dans une cellule : 10-18:30 ce qui doit donner 8:30 dans la cellule des résultats. par avance merci -- Joseph DENOUAL
J'ai oublié de mentionné que tu dois appliquer
le format de cellule avec lequel tu désires
afficher le résultat.
Salutations!
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news: u9tsBkpHGHA.2040@TK2MSFTNGP14.phx.gbl...
Bonjour Joseph,
Tu peux utiliser une fonction personnalisée
comme celle-ci que tu copies dans un module
standard :
'---------------------
Function HDiff(rg As Range)
Dim E As Variant
E = Split(rg, "-")
For A = 0 To UBound(E)
If InStr(1, E(A), ":", vbTextCompare) = 0 Then
E(A) = E(A) & ":00"
End If
Next
HDiff = Abs(CDate(E(0)) - CDate(E(1)))
End Function
'---------------------
Et dans la cellule, tu écris : = HDiff(a1)
Salutations!
"Joseph DENOUAL" <joseph.denoual3@libertysurf.fr> a écrit dans le message de news: %23rPc4joHGHA.3936@TK2MSFTNGP12.phx.gbl...
Bonjour,
QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail)
sachant que ces heures sont écritesde cette façon dans une cellule :
10-18:30
ce qui doit donner 8:30 dans la cellule des résultats.
par avance merci
--
Joseph DENOUAL
J'ai oublié de mentionné que tu dois appliquer le format de cellule avec lequel tu désires afficher le résultat.
Salutations!
"michdenis" a écrit dans le message de news: Bonjour Joseph,
Tu peux utiliser une fonction personnalisée comme celle-ci que tu copies dans un module standard : '--------------------- Function HDiff(rg As Range) Dim E As Variant E = Split(rg, "-") For A = 0 To UBound(E) If InStr(1, E(A), ":", vbTextCompare) = 0 Then E(A) = E(A) & ":00" End If Next HDiff = Abs(CDate(E(0)) - CDate(E(1))) End Function '---------------------
Et dans la cellule, tu écris : = HDiff(a1)
Salutations!
"Joseph DENOUAL" a écrit dans le message de news: %
Bonjour, QUELLE FORMULE UTILISER POUR CALCULER un nombre d'heure ( de travail) sachant que ces heures sont écritesde cette façon dans une cellule : 10-18:30 ce qui doit donner 8:30 dans la cellule des résultats. par avance merci -- Joseph DENOUAL
