Convertir nombre important de secondes en hh:
Fermé
Maastra
Messages postés
2
Date d'inscription
vendredi 24 juillet 2009
Statut
Membre
Dernière intervention
24 juillet 2009
-
24 juil. 2009 à 15:47
LeDénicheur Messages postés 565 Date d'inscription samedi 5 janvier 2008 Statut Membre Dernière intervention 1 décembre 2013 - 24 juil. 2009 à 23:38
LeDénicheur Messages postés 565 Date d'inscription samedi 5 janvier 2008 Statut Membre Dernière intervention 1 décembre 2013 - 24 juil. 2009 à 23:38
A voir également:
- Convertir nombre important de secondes en hh:
- Convertir youtube en mp3 avec audacity - Guide
- Convertir youtube en mp3 forum ✓ - Forum Logiciels
- Convertir pdf en word excel gratuit - Guide
- Convertir heure en centième excel ✓ - Forum Excel
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
6 réponses
eriiic
Messages postés
24570
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
23 avril 2024
7 213
24 juil. 2009 à 17:25
24 juil. 2009 à 17:25
Bonjour tout le monde,
Peut-être pas besoin de macro pour ça...
Avec tes secondes en A1, en B1 tu mets:
=A1/86400
et en format de cellule personnalisé tu mets [h]:mm:ss ou [h]:mm selon si tu veux les secondes ou non
2345678 s = 651:34:38
eric
Peut-être pas besoin de macro pour ça...
Avec tes secondes en A1, en B1 tu mets:
=A1/86400
et en format de cellule personnalisé tu mets [h]:mm:ss ou [h]:mm selon si tu veux les secondes ou non
2345678 s = 651:34:38
eric
LeDénicheur
Messages postés
565
Date d'inscription
samedi 5 janvier 2008
Statut
Membre
Dernière intervention
1 décembre 2013
358
24 juil. 2009 à 15:55
24 juil. 2009 à 15:55
Une macro ça te conviendrait ou pas ? :x
LeDénicheur
Messages postés
565
Date d'inscription
samedi 5 janvier 2008
Statut
Membre
Dernière intervention
1 décembre 2013
358
24 juil. 2009 à 17:03
24 juil. 2009 à 17:03
Tiens j'ai fais une macro qui fonctionne , le code le voici :
Private Sub CommandButton1_Click()
For j = 1 To 25
seconde = Sheets("Feuil1").Range("A" & j & "")
nbheure = seconde / 3600
nmin = seconde / 60
If nmin <= 1 Then
Cas = "A" & j & ""
MsgBox "Aucune valeure à convertir dans la case " & Cas & ""
End If
If nbheure >= 1 And nmin >= 1 Then
heure = Int(nbheure)
nbminute = (seconde - (heure * 60)) / 60
Min = Int(nbminute)
seconderest = seconde - (heure * 60) - (Min * 60)
End If
If nbheure <= 1 And nmin >= 1 Then
heure = ""
nbminute = seconde / 60
Min = Int(nbminute)
seconderest = seconde - (Min * 60)
End If
If heure = "" And nmin >= 1 Then MsgBox "" & seconde & " secondes vaut " & Min & " minutes et " & seconderest & " secondes."
If heure <> "" And nmin >= 1 Then MsgBox "" & seconde & " secondes vaut " & heure & " heures, " & Min & " minutes et " & seconderest & " secondes."
Next j
End Sub
Si tu sais pas te servir d'excel dis le moi.
Cette macro convertit les valeurs en secondes et affiche à chaque fois la conversion. Je sais que ce n'est pas ce que tu recherches mais j'attends que tu me dises si tu veux cela sous forme de macro ou pas pour rentrer dans le vif du sujet.
Il suffira simplement de selectionner toute la feuille puis que la macro fasse cellule apres cellule la meme manipulation jusqu'a la Nième colonne que tu aura définie ^^....
C'est une macro ou pas que tu veux alors ? :p
Private Sub CommandButton1_Click()
For j = 1 To 25
seconde = Sheets("Feuil1").Range("A" & j & "")
nbheure = seconde / 3600
nmin = seconde / 60
If nmin <= 1 Then
Cas = "A" & j & ""
MsgBox "Aucune valeure à convertir dans la case " & Cas & ""
End If
If nbheure >= 1 And nmin >= 1 Then
heure = Int(nbheure)
nbminute = (seconde - (heure * 60)) / 60
Min = Int(nbminute)
seconderest = seconde - (heure * 60) - (Min * 60)
End If
If nbheure <= 1 And nmin >= 1 Then
heure = ""
nbminute = seconde / 60
Min = Int(nbminute)
seconderest = seconde - (Min * 60)
End If
If heure = "" And nmin >= 1 Then MsgBox "" & seconde & " secondes vaut " & Min & " minutes et " & seconderest & " secondes."
If heure <> "" And nmin >= 1 Then MsgBox "" & seconde & " secondes vaut " & heure & " heures, " & Min & " minutes et " & seconderest & " secondes."
Next j
End Sub
Si tu sais pas te servir d'excel dis le moi.
Cette macro convertit les valeurs en secondes et affiche à chaque fois la conversion. Je sais que ce n'est pas ce que tu recherches mais j'attends que tu me dises si tu veux cela sous forme de macro ou pas pour rentrer dans le vif du sujet.
Il suffira simplement de selectionner toute la feuille puis que la macro fasse cellule apres cellule la meme manipulation jusqu'a la Nième colonne que tu aura définie ^^....
C'est une macro ou pas que tu veux alors ? :p
Maastra
Messages postés
2
Date d'inscription
vendredi 24 juillet 2009
Statut
Membre
Dernière intervention
24 juillet 2009
24 juil. 2009 à 18:23
24 juil. 2009 à 18:23
Merci beaucou pour votre aide! Ca fonctionne :)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
LeDénicheur
Messages postés
565
Date d'inscription
samedi 5 janvier 2008
Statut
Membre
Dernière intervention
1 décembre 2013
358
24 juil. 2009 à 23:38
24 juil. 2009 à 23:38
Comment se compliquer la vie ! J'suis un bon dans ce domaine x)
+1 Eriic =)
+1 Eriic =)
