Discussion :

[mickisa]

bonjour
je n'arrive pas à trouver précisement ce que je recherche dans le forum, alors je me lance.
lors que je passe d'un textbox à un autre je voudrais qu'il me transforme une série de 4 chiffres en heures hh:mm
mais avec mon code j'ai toujours 00:00

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub hfsopTextBox_Exit(ByVal Cancel As MSForms.ReturnBoolean)
 
hfsopTextBox = Format(hfsopTextBox, "hh:mm")
 
End Sub

[Jean-Philippe André]

Salut

il ne faut pas voir la fonction Format comme une fonction de mise en forme aussi simple

Ici, je recommande plutot une approche comme celle ci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub hfsopTextBox_Exit(ByVal Cancel As MSForms.ReturnBoolean)
if Len(hfsopTextBox) = 4 Then
       hfsopTextBox = Left(cstr(hfsopTextBox),2) & ":" & Right(cstr(hfsopTextBox),2))
End if
End Sub

[mickisa]

et oui effectivement, ta réponse est claire,
Merci