Entrer un temps style 01:12:45 sans devoir saisir les deux point Résolu/Fermé

Question

Bonjour, 

Je souhaiterai entrer un temps 

exemple : 1h12min45secc

De la façon suivante 011245 mais qu'il s'affiche automatiquement sous la forme 01:12:45

Je vous avoue que je coince un peu, le faire en VBA ou alors avec une formule ? :-(

Merci de vote aide

Configuration: Windows 7 / Internet Explorer 9.0

Zoul67 · Answer

Bonjour,

Par formule, tu peux t'inspirer de ça. https://answers.microsoft.com/en-us/office/forum/office_2007-excel/how-can-i-convert-from-hhmmss-to-hhmmss-in-excel/0506100b-9ab8-465d-a858-118abac522a2
En VBA, ça doit être faisable, pas très compliqué via un UserForm mais a priori ralentit le classeur si saisie directe dans les cellules.

A+

cs_Le Pivert · Answer

Bonjour,

Voilà en vba, a mettre dans la feuille concernée, pour la cellule A1, a adapter:

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
MonPremierTableau
    End If
End Sub
Sub MonPremierTableau()
    'Définit la taille du tableau et le type de données.
    Dim NomTableau(2) As String
    Dim i As Integer
    Dim chaine As String
    chaine = Range("A1").Value
   If Len(chaine) = 5 Then
   'Alimente les éléments du tableau
    NomTableau(0) = Left(chaine, 1)
    NomTableau(1) = Mid(chaine, 2, 2)
    NomTableau(2) = Right(chaine, 2)
   Else
    'Alimente les éléments du tableau
    NomTableau(0) = Left(chaine, 2)
    NomTableau(1) = Mid(chaine, 3, 2)
    NomTableau(2) = Right(chaine, 2)
       End If
Range("A1").Value = NomTableau(0) & ":" & NomTableau(1) & ":" & NomTableau(2)
End Sub
 

J'ai été obligé de faire 2 options, car 0 en premier est supprimé

Jrm · Answer

Merci à vous tous pour les solutions, ça marche au top !


Merci encore

Entrer un temps style 01:12:45 sans devoir saisir les deux point

3 réponses

Discussions similaires