formats heures minutes secondes

[jose pasledire]

Bonjour,
Je ne suis pas très calé sur Excel et je galère un peu pour trouver une formule qui permettrait de changer le format texte de toute une colonne en format heures, minutes secondes et pouvoir les additionner. Exemple
Format texte existant :
12s
15m14s
18h16m17s
etc. (La cellule comporte soit 3 soit 6 soit 9 caractères)

Il faudrait obtenir le format nombre suivant afin de le additionner ensuite :
00:00:12
00:15:14
18:16:17
Pouvez-vous m'aider ?
Merci d'avance

 

[kewell]

Re : formats heures minutes secondes

Salut
Tu selectionne ta colonne, tu vas dans format--> Cellule-->Personnalisée et tu tapes:
hh:mm:ss

je sais pas si sa repond a ta question.
BOnne continuation. Kewell

 

[Bernard_XLD]

Re : formats heures minutes secondes

Bonjour

essayes cette formule
cela te conviendra peut être

Cordialement, A+

=TEMPS(SI(ESTERREUR(CHERCHE("h";A1));"00";GAUCHE(SUPPRESPACE(A1);2));SI(ESTERREUR(CHERCHE("m";A1));"00";GAUCHE(DROITE(SUPPRESPACE(A1);6);2));SI(ESTERREUR(CHERCHE("s";A1));"00";GAUCHE(DROITE(SUPPRESPACE(A1);3);2)))

 

[jose pasledire]

Re : formats heures minutes secondes

Merci pour ta réponse rapide.
Cela ne réponds pas vraiment à la problématique.
le 12s en format hh:mm:ss reste inchangé. Il en est de même pour les autres cellules qui comportent 3, 6 ou 9 caractères (exemples : le texte 15m14s ou 18h16m17s) sont inchangés avec ce format ?
As-tu une autre proposition ?
Merci encore

 

[jose pasledire]

Re : formats heures minutes secondes

C'est bon, Yeahou a trouvé ce que je cherchais depuis des heures.
Un gand merci à tous et un particulier pour yeahou.
Bonne journée

 

[Brigitte]

Re : formats heures minutes secondes

Bonjour,

Si toutefois tu peux attendre, j'ai aussi mis un mot à André, qui est également très calé en format personnalisé... Je mettrais ma main au feu, que lui ou Monique, détiennent ta solution...

Patience !

 

[kewell]

Re : formats heures minutes secondes

Désolé, je vois trop pas...
Je suis tout comme toi un novice...
Bonne chance. Kewell

 

[andré]

Re : formats heures minutes secondes

Salut,

Essaie ceci :

=SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;"h";":");"m";":");"s";":")/SI(NBCAR(A1)=3;3600;SI(NBCAR(A1)=6;60;1))

Â+

 

[Monique]

Re : formats heures minutes secondes

Bonjour,

On peut faire la somme en 1 seule formule sans convertir chaque valeur texte en valeur numérique.

s'il n'y a pas de cellules vides :
=SOMME(SUBSTITUE(SUBSTITUE(SUBSTITUE(A1:A6;"h";":");"m";":");"s";":")/SI(NBCAR(A1:A6)=3;3600;SI(NBCAR(A1:A6)=6;60;1)))

s'il risque d'y avoir des cellules vides :
=SOMME(SI(A1:A6<>"";SUBSTITUE(SUBSTITUE(SUBSTITUE(A1:A6;"h";":");"m";":");"s";":")/SI(NBCAR(A1:A6)=3;3600;SI(NBCAR(A1:A6)=6;60;1))))

Formule matricielle, à valider pat ctrl, maj et entrée

 

[Brigitte]

Re : formats heures minutes secondes

Et voilà j'étais sûre...

Trop forts. J'espère que Josepasledire va revenir pour voir ces deux propositions même si celle de yeahou semblait convenir (pas essayé). Sur le coup j'avais cru que ct à yeahou qu'il disait que ca n'allait pas, mais ct la tentative de kewell qui n'allait pas ou ne suffisait pas.

Merci de nous trouver toujours des formules pour ces heures, minutes.... André et Monique.

 

[ChTi160]

Re : formats heures minutes secondes

Salut jose pasledire
bonjour le fil
une petite Macro(à mettre dans VBA module Standard)ici les données sont sensées être en colonne A depuis A2

Sub TransformTime()
Dim Tabtemp As Variant
Dim TabResult() As Variant
Dim L As Integer
Dim X As Integer
X = 0
Tabtemp = Range("A2:A" & Range("A65536").End(xlUp).Row).Value
  For L = 1 To UBound(Tabtemp, 1)
    ReDim Preserve TabResult(X)
    Select Case Len(Trim(Tabtemp(L, 1)))
        Case Is = 3
           TabResult(X) = "00:00:" & Left(Tabtemp(L, 1), 2)
           
        Case Is = 6
           TabResult(X) = "00:" & Left(Tabtemp(L, 1), 2) _
 & ":" & Mid(Tabtemp(L, 1), 4, 2)
        Case Is = 9
           TabResult(X) = Left(Tabtemp(L, 1), 2) _
 & ":" & Mid(Tabtemp(L, 1), 4, 2) & ":" & Mid(Tabtemp(L, 1), 7, 2)
    End Select
   
    X = X + 1
  Next
  
  Range("A2").Resize(UBound(TabResult, 1) + 1, 1) = _
Application.Transpose(TabResult)
 
End Sub

bonne Journée😀
Arff j'ai oublié les données sont remplacées par leur conversion Lol

 

[JeanMarie]

Re : formats heures minutes secondes

Bonjour

Félicitations à David, pour le boulot qu'il a fournit ce week-end.

Pour la transformation, il y a aussi cette formule
retourne une valeur alphanumérique
=STXT(SUBSTITUE(SUBSTITUE(SUBSTITUE("00h00m"&A1;"h";":");"m";":");"s";"");NBCAR(A1)-2;8)

retourne une valeur numérique
'=STXT(SUBSTITUE(SUBSTITUE(SUBSTITUE("00h00m"&A1;"h";":");"m";":");"s";"");NBCAR(A1)-2;8)*1
il faut appliquer un format personnalisé hh:mm:ss, pour voir la valeur base temps

@+Jean-Marie

PS, trop tard, mais je laisse les deux formules.

 

[Monique]

Re : formats heures minutes secondes

Re,

Plus court, alors :
=STXT(SUBSTITUE(SUBSTITUE("00h00m"&$A1;"h";":");"m";":");NBCAR($A1)-2;8)*1

Et la somme d'une seule formule :
=SOMME(SI(A1:A10<>"";STXT(SUBSTITUE(SUBSTITUE("00h00m"&A1:A10;"h";":");"m";":");NBCAR(A1:A10)-2;8)*1))

 

[jose pasledire]

Re : formats heures minutes secondes

vous êtes tous super. BRAVO
Bel élan de générosité dans le partage de la connaissance informatique,mais la situation vient de se compliquer.
A la problématique initiale et à laquelle certains d'entre vous aviez parfaitement répondu, de nouveaux formats se sont ajoutés :
Nouvelle problématique
Format texte existant :
12s
15m14s
18h16m17s
8s
1m6s
3h2m4s
etc. (La cellule comporte de 1 a 9 caractères)

Il faudrait obtenir le format nombre suivant afin de le additionner ensuite :
00:00:12
00:15:14
18:16:17
00:00:08
00:01:06
03:02:04s
etc


Merci encore pour votre aide

 

[Jocelyn]

Re : formats heures minutes secondes

Bonjour le Forum,
BOnjour jose pasledire, kewell, Yeahou, Brigitte, andré, Monique, ChTi160, JeanMarie (voila j'espere n'avoir oublié personne)

a essayer :

=SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;"h";":");"m";":" );"s";":")/SI(NBCAR(A1)<=3;3600;SI(ET(NBCAR(A1)<=6;NBCAR(A1)>3;ESTERREUR(TROUVE("h";A1)));60;1))

Jocelyn