Format date

[Temjeh]

Bonjour et merci d'avance

dans une cell j'ai 3,45 pour en réalité 3 h 45
dans une autre j'ai 1,45 pour 1 h 45

Mon prob et de savoir le format car le total des 2 me donne 4,90

Merci

Temjeh

 

[Calvus]

Re : Format date

Bonjour,

Au lieu de 3,45, entre 3:45 et 1:45

A+

 

[hoerwind]

Re : Format date

Bonjour,

Il faut faire un choix pour écrire 3h45, ou bien tu travailles en format horaire et alors tu saisis 3:45, ou bien tu travailles en format décimal et alors tu saisis 3,75

Comment Excel pourrait-il savoir que 3,45 vaut 3 heures et 45 minutes ?

Pour additionner ton format hybride et obtenir le bon résultat toujours dans ce format hybride, fais comme suit :

A1 : 3,45
B1 : 1,45
C1 : =ENT(A1)+ENT(B1)+(MOD(A1;1)+MOD(B1;1))/0.6
qui te renverra 5,50 et non 4,90

 

[Temjeh]

Re : Format date

Parfait

Je ne peut mettre des : j'opte pour la 2ème solution

Merci

Temjeh

 

[ROGER2327]

Re : Format date

Bonjour à tous

Une formule personnalisée fera-t-elle l'affaire ?

[COLOR="DarkSlateGray"][B]Function HeureBizarre(ParamArray p())
Dim i&, j&
Dim h#
   Application.Volatile
   For i = LBound(p) To UBound(p)
      Select Case VarType(p(i))
      Case vbDouble
         h = h + Sgn(p(i)) * (Int(Abs(p(i))) + (Abs(p(i)) - Int(Abs(p(i)))) * 5 / 3)
      Case Is >= vbArray
         For j = 1 To p(i).Count
            If VarType(p(i)(j)) = vbDouble Then
               h = h + Sgn(p(i)(j)) * (Int(Abs(p(i)(j))) + (Abs(p(i)(j)) - Int(Abs(p(i)(j)))) * 5 / 3)
            End If
         Next
      End Select
   Next
   HeureBizarre = Sgn(h) * (Int(Abs(h)) + (Abs(h) - Int(Abs(h))) * 3 / 5)
End Function[/B][/COLOR]

La fonction accepte les cellules, les plages de cellules, les valeurs numériques. Elle fonctionne (en principe...) avec des valeurs positives et négatives.

Exemple :si B14 contient 3,25, D14 contient -5,45, E14 contient 3,

[COLOR="DarkSlateGray"][B]=HeureBizarre(B14;D14:E14;1,05;-2)[/B][/COLOR]

renvoie -0,15.​

ROGER2327
#4111

Jeudi 5 Absolu 138 (Saint Bardamu, voyageur, SQ)
26 Fructidor An CCXVIII
2010-W36-7T00:13:09Z