calcul d'heures Fermé

Question

Bonjour,

voilà j''ai un problème pour calculer des heures

exemple

                   6h30
                   5h00
                   4h45  

je n'arrive pas à avoir le résultat
j'ai tout essayé,j'ai enlevé le h et mis une virgule, j'ai des lignes qui séparent les différentes semaines peut-être que ces lignes empèchent le résultat
je suis débutante dans excel et je ne sais plus quoi faire, cela vous étonnera un peu de demander une questionsi simple, veuillez m'en excuser
je vous remercie

Vaucluse · Accepted Answer

Complément d'analyse:
en fait c'est le signe - qui fache Excel. Pour avoir une différence d'heure dans ce cas, il faut passer par une valeur absolu et ça marche avec des cellules formatées en personalisé [HH]:mn:ss
Ainsi avec en A1: 3:30 et en B1:42:22:12, la formule en C1:
=ABS(C1-B1) renvoie bien 38:52:12
Bien crdlmnt

eriiic · Answer

Bonjour,

je n'arrive pas à avoir le résultat Quel résultat ??
Inscrit tes heures sous la forme 18:00
et fais tes opérations.
La cellule résultat doit avoir le format personnalisé [h]:mm si tu veux afficher un nombre d'heure supérieur à 24
eric

eriiic · Answer

Re,

c'est le format de la cellule qu'il faut changer.
Clic-droit sur la cellule, 'format de cellule', catégorie 'personnalisée', type: [h]:mm pour lui permettre d'afficher les heures > 24h (pour les sommes).

Pour les heures négatives il faut procéder autrement.
En A1: 23:00 (heure début), 
en A2: 05:00 (heure de fin), 
en A3: =A2-A1  => excel affiche #####, il ne sait pas afficher les heures négatives.
en A3 tu remplaces par =mod(A2-A1,1) => 6:00

Il y a une autre possibilité pour les heures négatives (passer excel en calendrier 1904) mais je te le déconseille fortement. Si tu as des dates que tu copies/colles dans un autre classeur elle seront fausses de 4 ans et 1 jour.
eric

debutante-excel · Answer

Bonjour Ericccc,

Interessée par ta solution pour les heures négatives

Pour les heures négatives il faut procéder autrement. 
En A1: 23:00 (heure début), 
en A2: 05:00 (heure de fin), 
en A3: =A2-A1 => excel affiche #####, il ne sait pas afficher les heures négatives. 
en A3 tu remplaces par =mod(A2-A1,1) => 6:00

j'ai personnellement testé et ca ne fonctionne pas meme en mettant MOD

ou est l'erreur alors ???

merci de vos réponses.

Vaucluse · Answer

Bonjour débutante
je m'immicie pour traiter un  peu de la plaisanterie habituelle d'Eric qui ne donne jamais une solution qui ne fonctionne pas. 
....Seulement son Excel fonctionne avec des virgules à la place des points virgules. Essayez de remplacer vous allez voir.
Quant à la configuration de l'excel d'Eric on ne peut pas l'empêcher de faire comme il veut :-)
Bein cordialement

debutante-excel · Answer

Bonjour,

J'étais la première étonnée d'ailleurs de la part d'Eriiiic qui est en effet un expert (un génie même) et  qui m'a je ne sais combien de fois déjà aidé dans mes développements.

Effectivement avec un ; à la place d'une , ca fonctionne tout de suite les heures négatives s'affichent.

Encore un grand merci pour votre aide.

Bonne journée.

Vaucluse · Answer

Re
Eh oui, mais je pense quand même que cette formule est à manier avec précautions, car en fait elle donne:
le total des heures passées de 0 à la première cellule + le total des heures passéesde la dernière cellule à 24
Ce qui fait que : 5:00-21: 00
Renvoi 8
Ce qui n'est pas tout à fait une soustraction, mais le cumul de 3 heures de la veille avec 5 d'un jour, si vous prenez la peine de placer en 1° colonne le jour et en deuxième la veille, ce n'est pas toujours le cas!
Par contre;, 30:00 - 36:00 renvoi 18 ?
Pas facile à manier
On attend Eriiic qui ne manquera de nous documenter la dessus!
Crdlmnt

lermite222 · Answer

Bonjour tous,
Deux fonctions pour répondre aux demandes
1ère, pour avoir la différence entre deux "heures"
Function DiffHeure(HNC As Range, HPC As Range) As Single
Dim H1
Dim H2
Dim M1 As Long, M2 As Long, D As Single

Dim T As Single
HN = HNC.Value

HP = HPC.Value
    Application.Volatile
    H1 = Split(HN, ":"): M1 = (H1(0) * 60) + H1(1)
    H2 = Split(HP, ":"): M2 = (H2(0) * 60) + H2(1)
    D = M2 - M1
    H1 = Split((D / 60), ",")
    M1 = Abs(D) - Abs(H1(0) * 60)
    DiffHeure = H1(0) & "," & M1
End Function

2ém Fait la somme d'une colonne
Function SommeHeure(R As Range) As Single
Dim cel As Range
Dim T As Single, TB
Dim X
    Application.Volatile
    For Each cel In R
        T = T + cel
    Next cel
    TB = Split(T, ",")
    While TB(1) > 60
    X = X + 1
    TB(1) = TB(1) - 60
    Wend
    SommeHeure = TB(0) + X & "," & TB(1)
End Function
Les deux fonctions peuvent afficher des heures négative.
A+

Calcul d'heures

8 réponses

Discussions similaires